
UTILITY CITY 

21 Useful Apple Utilities on One Disk 



by Bert Kersey 

■ APPLESOFT LIST FORMATTER 

A properly-spaced lister with page 
breaks, each statement on new line, 
loops indented, if-then's called out. 

■ COMMAND ZAP 

Put INVISIBLE functioning Applesoft 
commands or hidden statements in 
your programs for protection. 

■ Multi-Column CATALOGGER 

Catalog to printer or CRT in any num- 
ber of columns and any page width. 
File & sector codes optional. 

■ SCREENWRITER 

Format text directly on the screen. 

■ FILENAME ZAP 

Create trick or INVISIBLE file names. 

■ DOUBLE LOADER 

Run any Applesoft file while another 
program stays In memory. 

■ LINE SEARCH & REPAIR 

Access program lines in memory for 
repair or "illegal" alteration. 

■ BIGUNER 

Renumber illegally to make lines in- 
accessible; for program protection. 



■ RUN COUNTER DATER 

Posts last-run date or current run- 
number in your programs. 

■ HEX/DEC/BIN CONVERTER 

Convert while program stays intact. 

■ SORTFILE 

Store & alphabetize data on disk. 
Versatile, listable and customizable. 

■ AND MORE! 

21 Useful Utilities Total. 

PLUS- 
APPLE TIP BOOK #3 

Including informative articles and 
program listings— Cop/ Stoppers, 
DOS Trickery, Programming the 
Reset Key... plus complete easy-to- 
read Utility City instructions & "how-it- 
works" documentation. 

Free PEEKS AND POKES 

11 x 1 7 Wall Chart enclosed 

Apple's PEEKS, POKES POINTERS and 
CALLS on one heavy-duty poster. An 
indispensable programming tool! 



Beagle Bros presents 

Apple Tip Book #3 

A New Assortment of 
APPLE II TIPS & TRICKS 




Plus Complete Instructions for Using 

Utility City 

Multiple-Utility Disk 
by Bert Kersey 

Entire contents Copyright r 1982, Beagle Bros. Micro Software 
4315 Sierra Vista, San Diego, CA 92103 

"Apple", "Apple II", and the Apple Logo are all 
registered trade marks of the Apple Computer Company. 
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TIP BOOK 




STARTS HERE. 



PROGRAMMING THE RESET KEY 

There are a couple of pokes you can do into DOS that 
will make RESET act something like a ctrl-C. That makes 
it trappable by QNERR GOTO, and thereby makes it 
programmable to do anything you want it to. The program 
below demonstrates. 

WAIT A MINUTE! Be careful. I-f you make a 4^y£petypo, 
you could really foul things up. Also, if you have less 
than 48K, run down to the Computer Store with a ninety 
dollar bill and buy some more memory, because this 
program won ' t wor k with less than 48K. After you type 
it in, SAVE it, then RUN it. Try to stop it with a 
ctrl-C or a RESET. You can't. You have to let it run 
its course. The two pokes at the beginning of the 
program even program your electric cord so you can't 
disconnect your Apple (just kidding). 

20 ONERR GOTO 1000 

25 POKE 40286,35: POKE 40287,216 

30 X = X + 1 

40 PRINT X;" ";: IF X < 400 THEN 30 
50 POKE 40286,60! POKE 40287,212: END 

1000 PRINT : PRINT " START COUNTING. ..";: X = 0: GOTO 30 

Line 1000 could just as easily contain a NEW or LIST or 
RUN or DEL 0,999 or PRINT CHR* ( 4 ) ; "PR#6" or PRINT 
CHR* (4) ; "CATALOG" . . . 

Here's a set of pokes that will make the reset key boot 
when it's pressed: 

FOR X=1011 TO 1015: POKE X,0:NEXT 

or *3F3: 00 00 00 00 00 

DOS TRICKERY 

Here's a DOS change you can do without Dos Boss. If you 
peek location 43698 <*AAB2), you'll find a 132 (*84) . 
132 is the high-byte value of CTRL— D, DOS's code 
character for use in print statements. Now poke in a 192 
(POKE 43698,192), the hi-byte value for a 3. You have 
now changed the code character from ctrl-D to S. Now to 
execute a DOS command like CATALOG from a program, you 
can type PRINT "^CATALOG". 

Just one more way to confuse people and customize DOS to 
your needs, and it's kind of nice to be able to SEE the 
code character I 
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MOST PROGRAMMERS WANT 

more speed in their programs, and most programmers want 
their programs to occupy less memory. So, most 
programmers should abide by these tips: 




SPEED MAKERS — 

> Plan ahead to program efficiently. Write your program 
down in step-by-step plain English before you attack 
the keyboard. 

> Assign variables to frequently used constants. Don't 
use ''FOR X=12 TO 72". Instead LET T=12 and LET S=72, 
and use "FOR X=T TO S". The variables assigned values 
most early in a program seem to execute fastest. 

> Use NEXT instead of NEXT X. 

> Place frequently called lines early in your program. 




MEMORY SAVERS — 

> Renumber your program by l's starting with Line 1. 
Applesoft stores line numbers as strings, so the 
fewer digits in your SOTO' s and SOSUB, the less 
memory used. 

> Change all variable names to one character . Same 
reason as above. 

> Combine lines so that fewer line numbers reside in 
memory . 

> DIM your arrays as small as possible, and don't waste 
the zero-th array. 

> Delete all REMs when you are through with them. Save 
a remmed version if you want, and use the reinless 
one. 

> Delete useless words — Change each "THEN BOTO" to a 
"THEN" or a "BOTO." Don't use "LET" or "END" or file 
names after "CLOSE". 

Load a small test program. Then... 
PRINT FRE <0> +65536 

This wall tell you how many bytes of memory are 
available. Now make one of the changes mentioned above 
and PRINT FRE(O) +• 65536 again. The number will be 
slightly higher. 
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PADDLE PANEL 

Ever think of disassembling and mounting your paddles on 
a control panel 1 i ke so? — 




Kind of like electric train transf ormersji all of the 
buttons where you want them. Uncle Louie mounted his 
paddles on both sides of his Apple to make some nifty 
Raster Blaster flippers. 

SEIil— END 

If you want to end a program with no distracting 
flashing cursor, try one of these methods! 
If you're in hi-res, make your last line — 

lOOO VTAB 1: END 
The flashing cursor is on the text screen, but hidden by 
hi-res. This method won't work in lo-res or text, so 
try — 

lOOO BOTO lOOO 
You could program the cursor to come back when any key 
is pressed — 

1000 K=PEEK<-163B4>s IF K<128 THEN lOOO 

1001 POKE -16368, O: END 

The poke in 1001 prevents the keypress from appearing 
on the screen. 

TITLETIP 

You can start a file name with any character whose ASCII 
number is above 63. The DOS Manual says you have to 
start with a letter, but forgets to mention the at-sign, 
underscore, exponent sign, square brackets, backslash 
and the lower case equivalents of these characters. 



lO REM 



RUN PUN 



! ZPV ! TQFMMFE ■ SVO » X " 
"SPOH/" 



20 A* = "PPS 
22 A* = A* + 
25 L = LEN <A*> 
30 CALL - 1036 
40 CALL - 1036 
50 CALL - 998 
60 CALL - 1008 
70 PRINT LEFT*<A*,1) 
SO CALL - 211 
90 FOR I = 2 TO L 
lOO X =ASC< MID* (A*. 1,1)) 
HO PRINT CHR* (X - 28 + 
120 NEXT I 



ANC AS Sofij* 
AS YOU TVPE 
THE PROGRAM; 
you WILL TAtcB 
COT TUB TRASH.' 



L) ! 
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Hey kids! Draw some pictures ail over your tv set! To 
save the hi-res picture, reset out. of the? program and 
type "BSAVE liONA LISA, A*2000 , L*2000 " . To save the 
lo-res one, reset and type "BSAVE WHISTLER'S 
S I STER , A*400 , L*400 " . 

iO REM 



PADDLE PLOTTER 
< LO-RES) 



15 DIM C*(15) 

20 PX = 39 / 255s PY = PX:C = 1 

25 C*<0) = "BLACK":C*(1)"= " MAGENTA C* ( 2 ) = "DARK BLUE": 

C*(3) = "VIOLET" :C* (4) = " DARK GREEN " : C* ( 5 ) = " GREY" 
:C*(6) = "MEDIUM BLUE":C*(7) = "LIGHT BLUE " 

26 C*(8) = "BROWN"sC*(9> = "ORANGE" : C* ( IO) = " GREY " : C* (11 
) = "PINK":C*(12) = "LIGHT GREEN" : Ct ( 13) = "YELLOW" : 



■WHITE' 



C*<14) = "AQUA"!C*(15) 
30 HOME : GR 
40 XNU = PDL <C» * PX 
50 YNU = PDL <1) * PY 
AO XOLD = XNU: YOLD = YNU 
70 XNU = PDL <0> * PX 
SO YNU = PDL (1) * PY 
IOO COLOR= C: PLOT XNU, YNU 
HO IF PEEK < - 16384) > 127 THEN 

C + 1: IF C > 15 THEN C = O 
130 VTAB 21: HTAB 1: PRINT "PADDLES CHANGE POSITION— > X: 

"; INT (XNU):" Y: " : INT (YNU);: CALL - 868 
145 VTAB 23: HTAB 1: PRINT " ANY KEY CHANGES COLOR- > "; 

C: ": ":C*(C> ; : CALL - 868 
150 GOTO 60 



POKE - 16368, 0:C = 



IO REM 

PADDLE PLOTTER 
(HI-RES) 

============== rf^V 

20 PX = 279 / 255:PY = 191 / 255 ... 
30 HOME s HGR , t* Jfie °" ^° 

40 XNU = PDL (0) * PX «AiUe. 
50 YNU = PDL (1) * PY «OVFV 
60 XOLD = XNU: YOLD = YNU ,\0 o 4 «,° * V 

70 XNU = PDL (O) * PX &l4?t£.jA 
80 YNU = PDL (1) * PY »T <?<*\!«f l ' 

90 HCOLOR= 3 / A/*" 

IOO HPLOT XOLD, YOLD TO XNU, YNU ^ * 

HO REM IF XOLD < > XNU OR YOLD < > YNU THEN HCOLOR= O: 
HPLOT XOLD, YOLD TO XNU, YNU: REM (OMIT 1ST "REM" TO 
CHANGE) 
120 VTAB 22 

130 PRINT "X:"; INT (XNU);" " 
140 PRINT "Y:"; INT (YNU);" " 
150 GOTO 60 
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Here' s a little experiment that might teach you 
something about catalog formatting — I NIT a new disk, 
DELETE your greeting program, and RUN this; 

lO PRINT CHR* <4> ; "MONICO" 

20 FOR X = O TO 150 

30 PRINT CHR*(4>;"SAVE FILE #";X 

40 NEXT X 

This will take a while, so go make a sandwich or take a 
shower (you DO need one). Sooner or later, you will get 
a DISK FULL error message (around the lOSth file name; 
less in 3.2) not because the disk is full (you've only 
occupied about 210 sectors), but because there is no 
more room for file NAMES on the disk. 

CATALOG your new disk, and you will see dummy file 
names FILE #0, FILE #1, FILE #2, etc., up to FILE #104. 
Now try LOADing a program that doesn't exist. Instead of 
the expected FILE NOT FOUND message, you will get a DISK 
FULL message; a protest by DOS that he is stuffed and 
can't think straight. 

A copy of this disk can be handy if you are 
particular about the order of your file names on a disk. 
LOAD each program you want to store, and save it in 
whatever position you want. Say you have a program 
"STAR'SHOOTER" that you want stored in the 7th position 
on the disk. Simply LOAD STAR'SHOOTER from another disk, 
and SAVE FILE #7 on your new disk. Now RENAME FILE #7, 
STARSH00TER, and you've got it where you want it. 
Position other file names the same way, then RUN the 
following to DELETE the extra dummy files: 

lO PRINT CHR* <4> ; "MONICO" 

20 ONERR SOTO 50 

30 FOR X = 1 TO 104 

40 PRINT CHR* <4> ; "DELETE FILE #";X 
SO NEXT X: END 

Another interesting effect is to delete ALL BUT EVERY 
FIFTEENTH or so of your 105 files. Now you have a slower 
catalog! File that one under "How'd You Do That?" and 
show the gang. 

DEL 1Q 

The above statement won't work in a program. DEL needs a 
range of lines. What WILL work is " DEL IP, 10 ". All 
programs screech (silently.) to a halt with a DEL 
statement, so make it the last one in your program. 



6 



NO-CAT 

POKE -21503,16 prevents, a catalog. 17 is the normal 
value; at this address. Subtract 16384 -from -21503 for a 
32K system. 

CONT-CAT 

CATALOG a disk with more than 20 tile names. The catalog 
stops when the screen is -full, right? Well, SWITCH DISKS 
DURING THE PAUSE, and press any key to continue. What 
happens'? Let us know; we were afraid to try it. 

SAME NAME 

By using DOS' s RENAME function, two or more files can 
have the same? name. Now only the top same-name file will 
be recognized until you rename it! We like? to use the 
unimaginative but easy— to- sp el 1 title, several 
places in our catalogs as separators. 

PPL ADJUST 

To adjust your paddles so they won't send your cursor 
crashing off the hi— res screen, set variables PX=279/255 
a n d P Y = 1 7 9 / 2 5 5 . Th e n let X— PDL ( ) * P X and Y = P D L < 1 ) * P Y , 
and PLOT X,Y or whatever (see page 5). 

BACKSCROLL 

If you have a flashing cursor near the bottom of the 
screen, you can scroll text up ONE line with a backspace 
or up TWO lines with a carriage return. To get the 
cursor to the bottom you can type "TEXT." 

PfiNT SPCS 

If you're writing programs for others to read, always 
use PRINT SPC(IO) instead of PRINT " ". The 

reasons ar e ob v i ou s . 

SPACE SAVER #65535 ; 

These two programs do tht? same thing. One uses less 
memory — 

lO IF A<0 THEN B=60 

20 IF A>=0 THEN B=77 

or 

lO B=77: IF A<0 THEN B=6G 
20 (not necessary) 




CASSETTE TIP FOR DISKER5 

Keep your cassette player within reach in case you. lose 
DOS and are unable to save to disk. Just follow the 
instructions in your Apple Manual, SAVE to tape, 
re-boot, and LOAD from tape. 
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If you've been doi ngWsome weirdness on your Apple and 
want to start a new program, "FP" or " INT Fp " (if you 
have Integer in ROM) is more efficient than "NEW" tor- 
clearing memory and resetting pointers. Another way to 
"delete" most Applesoft programs is to POKE 2049,0: POKE 
2050,0, Put these pokes at the end of a program and it 
will erase itself. 



ELIMINATE THE NEGATIVE 

You often see memory locations expressed as negative 
numbers. Why? Because a bunch of guys sat around in a 
room one day and decided to subtract 65536 from certain 
numbers that are larger than 32767. Good grief! So if 
you see a negative number (as in CALL -958), you can add 
65536 to it and learn its true identity (as in CALL 
64578) . 



VI SI -LABELS 

Vou can make nice J — 1/2" >; 
card-weight cardboard like 



disk labels from business 




4l — dU&ks 
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GOTO 2 AND POS COLOR=OR 
TO AND AT COLOR=-INT 
COLOR=INT USR AT RESTORE 
PLOT-COLOR= ~ -FRE AT 
COLOR=OR AT TO SON COLOR= 
ABS+AT COLOR=SQR»RESTORE 
PLOT PLOT SCRN(+>COLOR= 
TO SON AT COLOR=POS>USR 
NEW PLOT 

HOME: FOR L=2055 TO 2105: 
PRINT CHR* (PEEK (L) ) ; : NEXT 




A A Contest! 

Uncle Louie's Apple is an old one with only 0.6K, so he 
really has a problem with some of the software on the 
market today. He was pretty excited about his upgrade 
last Christmas — we got him a 40-column board and a 
paddle. But he's still lacking in memory (in more ways 
than one), and needs some Two-Liners to play with. 

RULES: 

Your program must be written in 
Applesoft or Integer EiASIC and be 
no longer than two program lines, 
typable without a ?TOO LONG ERROR 
message. Decision of Uncle Louie is 
final. All programs will be judged 
on , . . 

(a) how impressive the program is 
when run. 

PRIZES: 

1st Prize: Any Beagle Bros disk 
2nd Prize: Any Beagle Bros disk 
3rd Prize: Any Beagle Bros disk 
4th-9th Prizes: Haven't decided yet 
10th Prize: Uncle Louie 




GIVE UNCLE LOUIE 
A HAND! 



The best 2-Liners will be printed in the next Tip Book 
and possibly make our TipDisk. Lookit — It's really a 
600D way to get some free software. Send your Two-Liners 
in today! 



check out some ofot/r 
winners — next pa&e. 
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APPLESOFT 
2-LINERB 



REM DAVE POL I DOR I — E YNON , PA 

1 Y = RND (1) * 191: H6R : HCOLOR= 7 s POKE - 16302, 

O: FOR 1=1 TO 750:X =X+Y/2-279*<X>2 
79) :X = X - 279 » <X > 279) sY =Y-X/4+191* 
(Y < 0):Y = Y + 191 * <Y < O) : HPLOT X,Y: HPLOT 
X.191 - Y: HPLOT 279 - X,191 - Y: HPLOT 279 - X, 
Y: NEXT Is BOTO 1 

2 REM LET THIS ONE RUN; LOT'S OF NICE AND DIFFERENT 

DESIGNS! 



REM REED DATA — SAN DIEBO, CA 

1 TEXT : HOME ! PRINT " YOU HAVE BEEN OFFERED ONE CEN 

T ON THE": PRINT "FIRST DAY OF YOUR NEW JOB. YOU 
R SALARY": PRINT "WILL BE DOUBLED EVERY DAY FOR 
A MONTH.": PRINT : PRINT "3 QUESTIONS SHOULD YOU 
ACCEPT?";: FLASH : HTAB 2: PRINT " ": NORMAL 

2 PRINT : PRINT "DAY" , "PAY" : PRINT " " , " 

-"■ POKE 34,8:SPD = 127 / 31s PAY = .Ols FOR DAY = 
1 TO 31: SPEED= 2 * SPD * DAY: PRINT DAY, "*" ; PAY 
;PAY = PAY * 2s NEXT DAY: PRINT : PRINT " ANSWE 
R: HOLD OUT FOR MORE.";: VTAB 23 



REM DAVID 6ERSHON — SEAL BEACH, CA 

1 POKE 232,255s POKE 233, 255s X = INT < RND <1> * 12 

O) + IsR = INT < RND (1) * 40) s HBR2 s ROT= Rs DRAW 
X AT 90,90sH = INT < RND (1) * 8) s IF H = O OR 
H = 4 THEN H = 1 

2 HCOLOR= Hs XDRAW X AT 90, 90s BOTO Is REM TRY THIS 

ONE EVERY NOW AND THEN. IT'S OFTEN DIFFERENT. 



REM CHRISTOPHER VOLPE — TRUMBULL, CT 

1 H* = "303: AD 52 CO AD 51 CO A9 22 EA EA EA EA 20 A 

8 FC AD 50 CO A9 47 3E OO OO 3E OO OO 3E OO OO 3 
E OO OO 3E OO OO 3E OO OO 3E OO OO 3E OO OO 3E O 
O OO 3E OO OO 20 AS FC 4C 06 03 N 303G" 

2 FOR I = 1 TO 40s PRINT "THIS IS TEXT PABE ONE. ";: 

NEXT : FOR C = 1 TO LEN <H*> s POKE 511 + C, ASC 
< MID* <H*,C, 1)) + 128s NEXT s CALL - 144 
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REM MARK BACHMAN — AUSTIN, TX 

1 HSR : FOR Z = O TO IO STEP .2: FOR X = O TO IO STEP 

.2s HCOLOR= 3:Y = - IO * COS <3 * SQR < (X - 5 
) - 2 + <Z - 5) "2)) / 2 + 50: HPLOT X * 20 + 2 

+ Z * 3,Y + Z * IO 

2 HCOLOR= Os HPLOT X*20+20+Z*3,Y+Z*10+ 

1 TO X * 20 + 20 + Z * 3, 180: NEXT : NEXT : END 
: REM SLOW AS MOLASSES, BUT WORTH THE WAIT! 



REM JERRY KRAMER — PHILADELPHIA, PA 

1 HOME : H6R2 ! HCOLOR= 3s FOR A = 20 TO 170 STEP 7 s 

B = 1.15 * < SQR (6400 - (A - 95) v 2) ) s FOR C = 
O TO 6.4 STEP .2sX = B * COS (C) + 139s Y = A - 
B * SIN (C) /5s IF C = O THEN HPLOT X,Y: NEXT 

2 HPLOT TO X,Ys NEXT s NEXT 



INTEGER BASIC 
2-LINER 



REM DAVE MADDEN — LISLE, IL 

1 CALL -936s TAB 9s PRINT "HOVERING U.F.O. EFFECT 
: TAB 13s PRINT "BY DAVE MADDEN" 

2 POKE 766,1s POKE 765,16s FOR 1=30 TO 1 STEP -1: 

POKE 767, Is CALL -10473s NEXT Is GOTO 2 

3 REM REQUIRES PROGRAMMER'S AID CHIP 



APPLESOFT AND INTEGER 
2-LINER 



REM MARC RINGUETTE — TERRACE, B.C., CANADA 

1 PRINT "OPENX-s PRINT "WRITEX"s PRINT "CALL-151"s PRINT 

"2s AD 30 CO 88 DO 04 C6 Ol FO 08 CA DO F6 A6 OO 
4C 02 OO 60 40 00"s PRINT "INT"s PRINT "9POKEO,A 
sP0KEl,B*42sCALL2s RETURN": PRINT " 3A=66 : B=4 s GOSU 
B9 s A=56 s B=3 : GOSUB9 s B= 1 : GOSUB9 s A=83 s B=6 s GOSUB9 s A= 
74 s B=2 s GOSUB9 s A=66s GOSUB9" 

2 PR I NT " 5A=63 s GOSUB9 s A=56 : G0SUB9 s A=49 s G0SUB9 s A=74 s B 

=6sG0SUB9:F0RJ=lT060sNEXTJsA=66sB=4s GOSUB9 : A=59 s 
B=3 s G0SUB9 s B= 1 : GOSUB9 " s PR I NT " 7A=56 s B=6 : GOSUB9 s 
A=49: B=2 : GOSUB9 s A=43: G0SUB9s G0SUB9: A=56: B=6s GOSU 
B9s END" : PRINT "RUN"s PRINT "CLOSEX": PRINT "EXE 
CX" 

3 REM TO ENTER THIS PROGRAM IN ONLY 2 LINES, YOU MUS 

T TYPE IT WITH NO SPACES AND SUBSTITUTE A "?" FO 
R EACH "PRINT". ALSO, ADD A CTRL-D JUST AFTER TH 
E FIRST QUOTE MARK ON "OPENX", "WRITEX" & "CLOSEX". 

4 REM YOU MUST HAVE BOTH APPLESOFT AND INTEGER IN YO 

UR APPLE TO RUN THIS PROGRAM. IMPORT ANT s SAVE 
BEFORE YOU RUN! 



11 




QUESTION NUMBER ONE 

The most-asked-questi on over the Beagle Bros phone is 
"How can I make Key-Cat run automatically when I boot my 
disk?". The answer is easy. Just BRUN MASTER CREATE. It 
will ask you what you want to call your greeting 
program. Enter "Key-Cat" or whatever you want to call 
it, and that's it! Now Key-Cat will run when you boot! 
Another way to make it run would be to put a PRINT 
CHR* (4) ; "RUN KEY-CAT" as the last statement in your 
greeting program. 

CLOSED DEPARTMENT 

You don't need to use a -file name when you CLOSE a file. 

SIDE A= =3 3012 



2-SIDED DISKS? 

We have been known to advocate your using both sides of 
a disk (see The Dos Boss documentation), but you won't 
find US doing it! Here are two reasons not to — 

1. A stack of disks is harder to search through with 
stuff on both sides. Solution: Label both sides' 
contents on one side of the disk. 

2. When you use the "wrong" side of a disk, it spins the 
"wrong" way, and can mess up the friction pad (or 
whatever it's called) inside the disk itself. This is 
potentially a b-i-g problem, and our good friend, 
Pete the Pessimist, says you can mess up not only the 
disk, but your DRIVE as well ! Pete also refuses to go 
outside of his closet without a hard hat. 

2-SIDED DISKS 

If you decide to ignore the warnings above, here's a tip 
we've seen widely used — Put 3.2 and 3.3 versions of 
your favorite utilities or whatever on opposite sides of 
a disk. 
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CRUISING THROUGH APPLESOFT 

Remember in the Dos Boss Book where 
we did a cruise through DOS to -find 
DQS's vocabulary? Well, here's a 
program that does the same in good 
old FP! 




20 START = 53456: FIN = 54116 : REM SUBTRACT 16384 IF 32K 
30 TEXT : HOME : INVERSE : PRINT " APPLESOFT COMMANDS: " 

: NORMAL : PRINT " >■ 

40 FOR X = START TO FIN:P = PEEK <X> 

50 IF P = 7 THEN INVERSE : PRINT "G" : : NORMAL 

60 PRINT CHR* (P> : 3 IF P < 128 THEN llO 

70 N = N + 1 

SO IF ERR THEN HTAB 1 + 22 * < <N - INT <N / 2) « 2) = 

O) 

90 IF NOT ERR THEN HTAB 1 + 8 * <N - INT <N / 5) * 5) 
IOO IF PEEK <36) = THEN PRINT 

110 IF X = 53854 THEN ERR = 1: INVERSE : FOR I = 1 TO 50 
0: NEXT : PRINT : PRINT : PRINT " APPLESOFT ERROR ME 
SSAGES: ": NORMAL : PRINT " 

II 

120 NEXT X 




NOW IS THE TIME FOR ALL GOOD 

programmers to check their typing 
speed. Admittedly, this program has 
a weird clock (each Apple can be 
t different ) , but you can calibrate it 
pretty well with a stop watch and a 
slight adjustment Line 30' s variable 
ADJ. The higher it is, the slower 
the clock. 



30 AD J = 97: REM < LOWER TO SPEED UP CLOCK) 
40 GOSUB HO 

50 T = T + N:K = PEEK <Q> : IF K < HBIT THEN 50 
70 POKE QQ f O: IF K < > CR THEN PRINT CHR* (K)sC*!sC = 
C + <K < > BKSP): GOTO 50 
CALL - 958:W = INT < <C + 2) / 5):S = INT <T / ADJ) 



SO 
90 



WORDS / "fSs" 
FOR 1=1 TO 



IOO 



105 
HO 



VTAB 22: HTAB 1: CALL - 958: PRINT W; 1 
SECONDS = "; INT (60 * W / S) : " WPM r ': 
39: PRINT s NEXT 

VTAB 24: HTAB Is PRINT » ANY KEY = TRY AGAIN, Q = Q 
UIT.":: HTAB 1: GET A*: IF A* < > "Q" THEN PRINT A 
*: GOTO 40 

VTAB 23: CALL - 958: END 

NORMAL : TEXT : HOME : VTAB 22s HTAB 7s PRINT "TYPE 
WHEN YOU HEAR THE BELL . " s FOR I = 1 TO 39s PRINT "-" 
;s NEXT : VTAB 24: HTAB IO: PRINT "TO STOP, HIT <RET 



CHR* (32) + CHR* (8) + CHR* (8) s 
= OsC = O 
- 16368: BKSP = 136: N = liHBIT = 12 



URN>. s 
120 C* = CHR* (95) + 

G* = CHR* <7):T 
130 Q = - 16384: QQ = 

8:CR = 141 

140 VTAB 1: FOR I = 1 TO 11: HTAB l:MOD = I - INT <I / 
2) * 2: PRINT CHR* (42 - 10 * (MOD = O) ) s : GOSUB 16 
O: NEXT : INVERSE : HTAB 1: PRINT G*s " START "sG*ss 
GOSUB 160s NORMAL s HTAB 1: CALL - 868 

150 POKE QQ.O: HTAB 1: PRINT C*s : RETURN 

160 FOR W = 1 TO lOOs NEXT : RETURN 
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scared away -from your computer 
of "World War 



GAMES FOR VISITORS 

How many people have you 

All you have to do is demo your new copy 
Four" or your dog-eared "3tar Bores" disk with its 
sophisticated grid-search phasors and gamma radiation 
shields and the non-computer types will quietly head -for 
the exits. 1+ you'd like to keep them around, why not 
demonstrate your latest version of Tic Tat: Toe or one of 
Beagle Bros Game Pack bonus games like Name Same or Gas 
Crunch or Poly-Dice. Each Game Pack has at least two 
games not mentioned in our ads that are interesting and 
challenging to beginners and non-beginners as well. Not 
only that, every game pack game is li stable AND 
changeable! Many of our customers have mentioned 
learning programming techniques from our game packs. 



? REMOVER 

Nothing rattles my chips as much as seeing a program ask 
me "TYPE YOUR ANSWER HERE?" . The question mark shouldn't 
be there, and with the Apple, it doesn't have to be. The 
question mark is produced in this program — 

lO HOME: PRINT "TYPE YOUR ANSWER HERE" 

20 PRINT " (8 LETTERS OR LESS) " 

30 VTAB 1: HTAB 22 

40 INPUT ANS* 
To eliminate the ?-mark, make Line 40 — 

40 INPUT ":";ANS* 
or, if you are completely anti-punctuation — 

40 INPUT "";ANS* 



TEXT SCREEN FORMAT 

In case you aren't clear about the layout of your text 
screen, run this program. 

IO REM 

TEXT SC 5||N_F0RMAT 

50 == HOME = 7 = NORMAlT: FOR 1 = 1 TO 39s A* = A* + CHR* <p> = VT 
NEXT : FOR 1=1 TO 24: VTAB I: HTAB 1: PRINT A*;: NEXT 
: INVERSE s FOR X = 2 TO 23: FOR Y = 5 TO 40 STEP 5: 
VTAB X: HTAB Y: PRINT LEFT* (A*, 1);: NEXT : NEXT 
60 FOR Y = 1 TO 24 STEP 23: FOR I = 5 TO 35 + 5 « <Y = 1 
> STEP 5- VTAB Y: HTAB I - <I > 9) : PRINT Is: NEXT : 

NEXT : NORMAL s FOR I = 1 TO 24: VTAB I: HTAB 1: PRINT 
I;T NEXT 7 POKE 2038,52: POKE 2039,48: INVERSE : BOTO 
60 

STOP 

Applesoft's STOP works just like END, but it tells you 
the line number where your program stopped. Use STOP for 
de-buggi ng . 
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Game Pack #1* 




1. TextTrain: Raceme on-scrcen clock with 
your text-format video "freight train." Real-time track 
switching & coupling simulations; hours of fun! 

2. Sllb Search: Find & capture the invisible 
enemy subs on your Apple color graphics scope! 
Sound-enhanced scanner, tracer & instrument panel! 

3. Plck-a-Paif: A colorful Apple party game 
for all ages and skill levels! Uncover and remember the 
hidden graphics symbols to score big & win! 



Game Pack #2* 

/P * 




1. Wowzo: Our challenging changeable maze 
game! Capture targets in a flexible maze, and 
outmaneuver your opponent before time runs out! 

2. Elevators: Keyboard control 4 elevators at 
one time in your CRT skyscraper. You'll need a compu- 
ter to solve this one! 

3. Quick-Draw!: You command two colorful 
gunmen who shoot it out on your Apple screen! 



Game Pack #3* 




1. Magic Pack: Four mind-bending tricks in 
one fantastic Magic Show! Only you and your Apple 
know how to perform these amazing feats! 

2. Slippery Digits: A challenging & colorful 
number-action game for all ages. A great demonstra- 
tion of your Apple's capabilities! 

3. Oink! A nerve-racking sound-enhanced video 
dice game with unpredictable results and lots of 
laughs! 



Game Pack #4* 




1. BuZZWOrd: A comical story-creator with 
endless possibilities. 5 changeable stories in memory 
plus a fascinating "Create Your Own Story" program! 

2. Triple Digits: A thinker's game with num- 
bers. Score in four ways and outfox your opponent! 

3. Corn Game: A kids' guessing game involving 
3 farm animals and endless supply of corn! 



do/ bo// 

DISK COMMAND EDITOR 

by Bert Kersey and Jack Cassidy 

DOS BOSS is an extremely versatile, easy-to-use 
Apple utility package that will customize your disk sys- 
tem and personalize your personal computer! Here 
are just SOME of Dos Boss's useful features- 
Rename DOS Commands by simply enter- 
ing the command you want changed (say "CATA- 
LOG") and your new command (say "CAT"). Now 
"CAT" will catalog your disks. Other changes are just 
as easy . . . 

Change the "Disk Volume" heading to 

anything you want; your name, disk title or code; with 
or without the Volume Number. Inverse, Flash or 
Normal! 

"Save-Protect" your programs! An 

unauthorized copy attempt will produce a "NOT 
COPYABLE!" message. 

One-key program selection! Run 

programs by pressing only the key indicated on the 
screen. Instant free-space on disk with one key too! 
Customized Catalogs! Create multi- 
columned cataloss that fit more file names on the 
screen. Catalog only the file-types you want (A, I, B 
and /or T). Omit or alter sector numbers and languase 
codes too! 

Rewrite Error Messages! "syntax error- 

can be "TRY AGAIN!" or "NO COMPRENDE"; "DISK 
FULL" can be "BURP!" . . . anythins you want! 

All of DOS BOSS'S change features 
may be appended to any of your 
programs, so that anyone using 
your disks on any Apple (booted or 
not) will be formatting DOS the way 
you designed it! 

Plus the DOS BOSS BOOK! 36 pages of 

valuable Apple info! An excellent learning tool 
covering all DOS BOSS features PLUS a new collection 
of Beagle Bros. Apple tips & tricks; a great companion 
to our original Beagle Bros. Apple Tip Book (also in- 
cluded free!). 

Inside The DOS BOSS BOOK: 

• Discover some strange Apple bugs! 

• Put Inverse REM Statements in your listings! 

• Two-sided Apple disk tips! 

• Make your programs un-listable! 

• Custom-format your catalogs! 

• Change DOS with creative POKING! 



DOS BOSS © 

and The DOS BOSS BOOK 

3.2 or 3.3 Applesoft 





Alpha Plot Hi -Res image dumped to printer 



alpha plot 



48K REQUIRED 



ALPHA PLOT was actually 
written as a keyboard 
plotter to draw the above 
portrait tor our animated 
"Talking Heads" demo, 
which you've probably seen 
on our games disks or Dos 
Boss. Since then. Alpha 
Plot has expanded feature- 
wise to become a really 
complete graphics package 
with sophisticated TEXT 
-features as well. Our 
favorite is PROPORTIONALLY 
SPACED TYPE, quite a bit 
more attractive, we think, 
than the normal Apple text 
Also, you can SHIFT ALL OR 
PART of a picture to a new 
like being able to append 
. For example, you can 
imprint your logo on all of your hi -res charts or 
graphs. You can also temporarily or permanently 
SUPERIMPOSE hi -res pages, handy for comparing images or 
setting up animation layouts. There's also a program 
called SCRUNCH that compresses Hi -Res. The picture above 
occupies only 17 sectors instead of the normal 34. 
One-third compression is not uncommon; it depends on the 
amount of detail in the image. HI--LO PLOT is still 
another program on the Alpha Plot disk. With it, you can 
make a Lo-Res " i mpr £?ssi on " of your Hi-Res picture. The 
list goes on... I'm sure you'll like Aloha Plot, 



Hi-Rcs Apple Graphics/Text Utility 

by Bert Kcncy * Jack Caswdy 

HI-RES DRAWING: Create hi-res pictures & charts, 
appendants to your programs. Keyboard or Paddle control; Op- 
tional Xdraw Cursor (see lines before you draw!); Any color mix or 
REVERSE (opposite of background); Circles, Boxes 4 Ellipses, filled or 
not. Bonus Programs too — SCRUNCHES stores hi-res in as little as 1 /3 
normal disk space. SHIFTER transfers any portion of the hi-res screen. 
Also supenmpose hi-res images and convert Hi-Res to Lo^tes & back 
for fascinating abstracts! 

HI-RES TEXT: Beautiful upper & lower case with Descenders; 
color or reverse; Positionable anywhere (NOT restricted by Htabs & 
Vtabs). Professional looking PROPORTIONAL SPACING! Adjustable 
Type Size, Leading (line spacing) & Kerning (letter spacing). Multi- 
directional typing; up, down, even backwards! 



PLUS . . . APPLE TIP BOOK NUMBER FOUR! 

PAGES o' tips (or making the most of your Apple's advanced 
graphics capabilities Alpha instructions plus shape table tips, new 
titling & color tncks and fascinating animation experiments' 



Alpha Plot on Applesoft Disk. 
)/ Beagle Bros Apple Tip Book #4 
✓ Apple PEEKS, POKES & POINTERS Chart. 



screen location. It's kind of 
a subroutine to your programs 




DISK ZAP? 

Just how fragile? are diskettes? Why not find out? Take a 
disk that is expendible, and place it an inch or two 
■from a magnet. Will it still boot? Lean it against your 
color tv screen. Now call the dog over to the Apple... 

Disks can be zapped in many ways, but are 
surprisingly tough when you consider what they consist 
of. We couldn't resist cutting one open. Can you? 



SB . □ 1 



If you have more than two disk drives, label them with a 
black Dymo-type label <"S6,Di", "S6,D2", etc.) so you 
can tell at a glance which drive goes to which slot. 

While you've got your label er out, try labeling a 
few disks. Not bad, right!? 



PDL - □ 



Also, identify your PADDLES with "-0-" and "-1-" 
Dymo labels. You can tell which paddle is which with the 
program below. RUN it and mess with your paddles... 

lO HOME: BUTTUN = -16287 
20 FOR X = O TO Is NORMAL 

30 IF PEEK < X+BUTTUN) > 127 THEN INVERSE 

40 VTAB 10: HTAB 1 + 20 * X 

50 PRINT " PADDLE "; X; " : " ; : NORMAL 

60 PRINT " "; PDL (X); SPC<2) 

70 NEXT X: SOTO 20 

The word "Paddle" should light up when the appropriate 
button is pressed, and you should get values from to 
255 when you turn the knobs. If you don't, you can clean 
the contacts inside (carefully) with some electrical 
contact cleaner. The paddles are undoubtedly the weakest 
Apple hardware link. Good old Rob & Brent at the Apple 
Store replaced my original thumb-killer paddle buttons 
with nice fat red ones they bought from Radio Shack 
(what''). I highly recommend it for all serious paddlers. 

SPACE ERASERS 

Notice the SPC (2) after the PDL value in Line 60 above. 
This erases trailing digits when the values drop from 
three-to-two or from two-to-one digit. Try the program 
with and without the SPC<2) and you'll see. 
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> If you LIST any program line, the cursor will appear 
THREE I i nes below the listing; EXCEPT if it's the 
LAST program line, the cursor will appear TWO 1 i nes 
below. If you think of a use for this tip, let us 
know. 

> Extra colons are often ignored. This statement works 
even though it looks a little buggy: 

IF X=0 THEN : : s : PRINT "I TOLD YOU!" 

> Lots of minuses are o.k. too, as in 
PRINT lO 

Each pair of negs makes a pos. 

> Tracing over a REM statement will add an EXTRA SPACE 
after the word "REM" when you list. The Apple adds a 
space after all tokens. When you trace over a rem, 
the Apple considers the traced-over space part of 
your remark. The same rule applies to tracing over 
data statements. 




ERROR SILENCER 

Many beqir.mng programmers don't know about Applesoft's 
" QNERR " command,, Put an ONERR GOTO 9999 (or whatever 
line you want) at the beginning of your program. Any 
time (almost) an error occurs, instead of crashing with 
an error message, your program will jump to Line 9999 
which could instruct the program to jump to your menu, 
or start over. While you are programming, you will WANT 
error messages, so stick a REM in front of your ONERR 
command; or put a POKE 216,0 in the routine you are 
working on. This poke disables ONERR. 

D I SASSEMBL I ST 

If you want to list DOS or some humungous binary program 
to your printer, you have to — 

3 CALL -151 

*9000L 

...then wait for the screen to fill, and type another 
"L", and so on, until your "L" finger has had it. But 
wai t ! Try thi s — 

•9000LLLLLLLLLLLLLLLLLLLLLLLLLLLLLL 
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BOSUB POKER 

In Apple's other language, the late Integer BASIC, you 
could set line numbers equal to variables (like LET 
X=SHUFFLE). Then you could say GOSUB SHUFFLE or IF 
EMPTY THEN SHUFFLE. When you looked at your program, 
you could tell what was happening without reirs. Well, 
you can't do that in Applesoft, not even with this 
program; it's only about 307. as good. Type it in 
care-fully; the first two lines have to be EXACTLY as 
printed here, or the whole thing gets scrambled. 

20 POKE 2213,48 + 6 - INT (B / IO) * lOt POKE 2212.48 + 
INT < <6 - INT <G / IOO) * IOO) / IO) : POKE 22il,48 
+ INT < <G - INT <G / lOOO) * lOOO) / IOO) ! POKE 2 
210 48 + INT <<B - INT <G / IOOOO) * IOOOO) / lOOO 
>: POKE 2209,48 + INT <G / IOOOO): BOSUB OOOOOs 

RETURN 

30 SHUFFLE = 12345: COUNT = 678 
40 B = SHUFFLE: BOSUB 20 
45 G = COUNT: BOSUB 20 
50 END 

678 PRINT "THIS IS COUNT.": RETURN 
12345 PRINT "THIS IS SHUFFLE.": RETURN 

Notice that instead of "BOSUB SHUFFLE " , you have to say 
" G=SHUFFLE : BOSUB 20". When you do, the 6QSUB in line 
20 is actually CHANGED in the listing. 



PAGE BUB 

Turn your Apple OFF & ON and run this prograr 

20 HOME: BR: REM <That's{GR, not HSR) 
30 FOR X = O TO 255 
40 HPLOT X,Y 
50 PRINT X 
60 NEXT 

You have just drawn all over Page Zero! WEIRD THINGS 
happen if you don't set the page pointer at 230. It 
should be set to 32 or 64 for hi -res page 1 or 2. HGR 
and HGR2 do this for you, but when you turn on your 
Apple it's set to 0. See your Peeks s< pokes Chart. 

RE-BOOT AFTER RUNNING! 




IF INVERSE THEN BOSUB 99 

The above statement won't work. What will work is "IF 
PEEK (50) =63 THEN GOSUB 99". To find out the format of 
the characters about to be output to the screen, PEEK 
at location 50 by typing PRINT PEEK (50). A 65 answer 
means inverse. 255 means normal. 127 is flash. You can 
also create the format you want by poking in the above 
numbers (although simple commands do the same thing) — 
POKE 50, 63 will create inverse type and POKE 50,255 
will create normalize. POKE 50,127 will flash 
alphabetical characters. You'll have to add a POKE 
243,64 to flash numbers and other characters. By the 
way, there's NO WAY to inverse or flash lower case. 
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BETTER GETTERS 

Applesoft's blasted INPUT function won't accept <1> 
commas, (2) colons, or <3) leading spaces. Try 
answering an INPUT with a comma or colon in the answer 
and you get the famous "7EXTRA I SNORED" statement. It 
doesn't make a lot of sense the first time you see it. 
Well, let's do something about the problem. Here's are 
two little inputters. Both feature different types of 
inputs that accept (1), <2> AND (3) M 



20 HOME :BKSP* = CHR* <8>:CR* = CHR* ( 13) iQ* = CHR* < 
34) 

30 PRINT "WHAT'S YOUR NAME? "; 
40 NAME* = ,,M ! SOTO 50 

50 GET LTR*: IF LTR* = BKSP* THEN NAME* = LEFT* (NAME*, 

LEN <NAME«) - 1): NORMAL s PRINT LTR*:" " : 
bO IF LTR* = CR* THEN 100 

70 IF LTR* > = " " THEN NAME* = NAME* + LTR* 
80 INVERSE : PRINT LTR*; 
90 GOTO SO 

lOO EMAN* = " M : FOR X = LEN (NAME*) TO 1 STEP - 1 : EMAN* 

= EMAN* + MID* (NAME*, X, 1 ) : NEXT X 
HO NORMAL s PRINT : PRINT : PRINT Q* : NAME* ; Q* " SPELLED 

BACKWARDS": PRINT "IS ";: PRINT Q* ; EMAN* ; " . " ; Q* : PRINT 

120 PRINT "TYPE ANOTHER NAME: "; 
130 GOTO 40 



20 HOME 

30 PRINT "TYPE YOUR NAME " : PRINT " (LAST, FIRST) : "; 
40 CALL - 657 

50 NAME* = "": FOR X = 512 TO 767:C* = CHR* ( PEEK (X)): 
IF C* < > CHR* (141) THEN NAME* = NAME* + C*: NEXT 

60 L = LEN (NAME*): FOR X = 1 TO L: IF MID* (NAME*. X , 1 ) 
< > CHR* (172) THEN NEXT : PRINT "PLEASE SEPARAT 
E YOUR NAMES WITH A COMMA.": GOTO 30 
70 LAST* = LEFT* (NAME*, X - 1) 
80 FIRST* = RIGHT* (NAME*. L - X) 

90 L = LEN (FIRST*): IF LEFT* (FIRST*. 1 ) = CHR* (160) THEN 

FIRST* = RIGHT* (FIRST*. L - 1): GOTO 90 
lOO PRINT : PRINT "HELLO, ":FIRST*s" " ; LAST*; " . " : PRINT 

"MY NAME IS COMPUTER, APPLE!" 




Sure, you can BSAVE the text screen! Just type BSAVE 
TEXTTEST, A*400, L*3FF. Any time you want it. back, type 
"BLOAD TEXTTEST". Of course, any command you type to 
save the screen will appear when you BLOAD it. To 
prevent this, put. the BSAVE statement as the last, line 
in your text-printing program: 

PRINT CHR* (4) ; "BSAVE TEXTTEST, A*400, L*3FF" 
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WHY BUY MORE THAN ONE DISK DRIVE? 

1. You can make taster disk copies. 

2. You can use certain software that requires two 
drives. 

3. You will have a backup drive when one goes bad <it 
happens) . 

4. You can have immediate access to twice the data. 

5. You can get rid of that extra *500 bill in the 
dresser drawer. 



I learned how to program in Integer BASIC, and have 
since converted my efforts to Applesoft. The INT feature 
I miss most is the MOD or remainder function. 3 MOD 2 is 
1 , 99 MOD 10 IS 9, etc. This is a very useful function 
that can be simulated in Applesoft with many more 
keystrokes. Here is a MOD program in Integer — 
>LIST 

lO REM INTEBER 

20 FOR X = 1 TO lOO 

30 IF X MOD 3 = O THEN PRINT X 

40 NEXT X 

To convert to Applesoft, just change Line 30 to — 
30 IF X — INT<X/3> * 3 = O THEN PRINT X 



MOD 




sad this here! 



bne of the newer Apples with the grey 
Iters, you will find that underneath 
Dane), is one of the most important 
ever use. Try it. You'll be amazed! 
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lO REM 
MARQUEE 

20 HOME :SP = 50 

30 VTAB 1: PRINT " TYPE YOUR COPY BELOW. "5 PRINT 

40 INPUT "";A*: IF LEN (A*) > 40 THEN VTAB 3: CALL - 

958: VTAB 20: PRINT "40 CHARACTERS OR SHORTER, PLEAS 

E. " ; CHR* (7): 60T0 30 
50 HOME : VTAB 3: PRINT A*:L = LEN <A*> 

60 FOR I = 3 TO 12: VTAB I — 1 : CALL - 868: VTAB Is PRINT 

A*: FOR J = 1 TO 99: NEXT : NEXT 
70 VTAB 1: PRINT " (KEYS 0-9 CONTROL SPEED.)";: FOR 1=1 

TO 999: NEXT : HTAB 1: CALL - 868 
SO IF L < 40 THEN FOR I = L + 1 TO 40: A* = A* + " ": NEXT 

90 P = P + 1: IF P > 40 THEN P = 1 

IOO VTAB 12: HTAB 1: PRINT RIGHT* (A*, 41 - P) ; : IF P > 

1 THEN PRINT LEFT* (A*,P - 1) 

HO K = PEEK ( - 16384): IF K < 128 THEN 130 

120 POKE - 16368, O: IF K > 175 AND K < 186 THEN SP = 30 

* <K - 176) 

130 FOR I = 1 TO SP: NEXT : BOTO 90 



in use? m&fr 
r-,, , 

We just decided last Tuesday that IT IS O.K. to type 
keyboard commands while your drive's "In Use" light is 
lit as long as you have a prompt and -flashing cursor. 
The Apple drives run -for about one second after they are 
•finished doing whatever it is they do in there. No one 
anywhere knows why. 

A*=?? 

Sometimes, strings can contain hidden characters like 
leading or trailing spaces or control -characters. 
Setting screen output to inverse, will reveal hidden 
spaces. Type A*="FISH ": PRINT A*. The Apple will hand 
you a -four-letter word apparently wi thout the trailing 
space. Now try INVERSE: PRINT A*. You can now see all 
f i ve characters, including the space. Another way to 
search -for hidden characters is to PRINT A*; LEN ( A*> . If 
the number is higher than the number of visible 
characters in the word, you can suspect some hidden 
control characters or spaces. 

SQUISHY INVERSE? 

If your inverse characters arc? bleeding together and 
difficult to read, try turning the little black knurled 
screw near the paddle socket until you see what you 
want . 




HOW TO BET RICH: 

Market replacement Apple "K" .?< "D" key 
caps with little lumps on them. Your 
fingers can then feel their way to the 
correct keys. The Apple /// uses this 
method, and it works. 
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LINE TRACER 

Any time you want, to know what line is operating in a 
program, put a PRINT PEEK (117) + PEEK < 1 1 8 ) * 256 . To -find 
out what line an ONERR error was encountered, PRINT 
PEEK (218) + PEEK (219) *256. This program demonstrates — 



13 ONERR SOTO 5000 

14 PRINT "THIS IS LINE "i PEEK <117) + 256 * PEEK <118) 

FOR 1=1 TO 500: NEXT 
202 PRINT "THIS IS LINE "s PEEK <117) + 256 * PEEK <11B 

);".": FOR I = 1 TO 500: NEXT 
768 PRINT "THIS IS LINE " : PEEK <117) + 256 * PEEK <118 

>!"."! FOR I = 1 TO 500: NEXT : GOTO 14 
5000 PRINT " PROGRAM STOPPED AT LINE "; PEEK <218) + 256 * 
PEEK (219);".": END 



THERE'S MORE THAN ONE MAY TO 

^type Apple's three keyless 
^characters! the backslash, 
the left square bracket and 
the underscore; and here's 
"one ot them: Try pushing any 
three or -four keys at the 
same time. It's difficult to 
predict what will appear on 
the screen. If you have a 
lower case adaptor, you can often produce lower case 
letters by pressing two keys. With this in mind, we set 
out to find our elusive keyless characters, figuring 
that some combination of other keys would produce what 
we wanted. Sure enough... Simultaneously press the 
shift , JJ «< _I_ keys and HOLD THEM DOWN while you type a 
¥, then an H_ and then a J_. There they are; the three 
illusive characters, each with a normal character 
thrown in. Kind of strange, huh? You can make them 
useable by typing these characters in a listing as 
described here, and then delete the characters you 
don't want by normal editing methods. 




40-CQLUMN FIXER 

Extensive research by our Extensive Research Department 
shows that more people need to know this text tip than 
any other, so pass it around. To align text characters 
when they are printed on the screen, simply align them 
IN THE LI ST INS WHEN YOU TYPE. For example, this — 
lO PRINT "PROSRESS REPORT FOR H. H. LUMPY 



S DUE 
44. OO" 



MONEY IN 
'* 4.00 



MONEY OUT 
♦44444. OO 



BILL 
* 4 



IfrntSte left Margin atightnent. 



will appear like this when run — 

PROGRESS REPORT FOR H. H. LUMPY 

MONEY IN MONEY OUT BILLS DUE 

* 4.00 *44444.00 * 444. OO 



This alignment will take place only when you ENTER a 
print statement, not when you I i st it. 
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BETTER INVERSE 

Inverse titles look better it you frame them with 

spaces. Try it — 

lO HOME: INVERSE: HTAB 17: PRINT "HEADLINE" 
20 VTAB 12: HTAB 16: PRINT " HEADLINE ": NORMAL 

It you've got room, you can real 1 y -frame a title — 
lO HOME: INVERSE: HTAB 18: PRINT SPC(7) 
20 VTAB 2: HTAB 18: PRINT " TITLE " 
30 HTAB 18: PRINT SPC<7): NORMAL 



« 99 

YOU CAN Q*OTE THIS: 

Here's one way to get quote marks in a PRINT statement — 
lO Q*=CHR*<34) 

20 PRINT "THIS IS ";Q«; "ILLEGAL. ";Q* 

Did you know that semi -colons are often unnecessary in 
spite of what your Mother told you? Line 20 could be— 
20 PRINT "THIS IS "Q*" ILLEGAL. "Q* 

REMLESS REMS 

You can leave the word "REM" out of unencounter ed REM 
statements, but your Apple will pars the heck out of 
your remark. Type this in; it runs fine, but lists 
funny — 

GOTO 2 

1 THIS IS LINE ONE, A SIMPLE STATEMENT, NOTHING MORE. 

2 END 



RAM, ROM, PEEK, POKE 

You can PEEK at RAM and ROM, but you can only POKE into 
RAM. That's why you can change DOS, but not. Applesoft. 
RND CHART 

If you are a random-number nut like me, you'll like 
watching your Apple draw numbers out of his hat and 
graph the results. 

IO HOME : FOR N = TO 9: VTAB 21: HTAB 2 + 4 * N: PRINT 

N: HTAB 1 + 4 * N: PRINT " " : NEXT 

12 X = RND ( - 65536 +■ PEEK <78) + 256 * PEEK <79)> 
15 HGR : HCOL0R= 3 

20 C<0) = 3:C<1) = 1:C<2) = 2:C(3) = 5:C(4) = 6: FOR I = 

5 TO 9:C<I) = C(I - 5): NEXT 
3d HCOLOR= 6: FOR Y = 9 TO 159 STEP IO: HPLOT O, Y TO 279 

,Y: NEXT : HCOLOR= 3: FOR Y = 9 TO 159 STEP 50: HPLOT 

0,Y TO 279.Y: NEXT 
50 FOR I = 1 TO IOOOOOO 
60 A = INT < RND (1) * IO) 
70 X(A) = X<A) +1 

80 IF X<A) - INT (X<A) / 50) * SO = O THEN INVERSE: FOR 
BUZZ = 1 TO 9:S = PEEK ( - 16336): NEXT 

90 IF X<A) > 160 THEN AVG = INT (I / IO) : VTAB 24: HTAB 
1 f,4-« IN V ERS .S„ ! PRI NT CHR* <7):" AVERAGE: " ; AVG: " ";: 
VTAB 1: HCOLDR= 3: HPLOT 0,161 - AVG TO 279,161 — A 
VG: HPLOT O, 159 - AVG TO 279,159 - AVG: NORMAL : END 

100 V .I££Jr 3! HTAB 1 + A * 4 + <X(A) < lOO): PRINT X (A) : 
NORMAL 

HO HCOLOR= C<A): HPLOT 3 + A * 28, 160 - X<A) TO 15 + A * 

28, 160 - X (A) 
120 NEXT 
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10 RE " 

THE BREAT = fa |2UH « 

TRACE MYSTERY! J** 1 

20 H* = "HHHHHHHHH"! I* = " I I II I I I I I I » 

30 HOME s VTAB lOs PRINT I*s FOR I = IO TO 

19i VTAB It HTAB lOi PRINT "J": NEXT : VTAB 

20: PRINT "G";H* 
40 COLOR= 8: HLIN 0,9 AT 19s HLIN 0,9 AT 39 

s FOR I = 19 TO 39 STEP 2j PLOT 9,1: NEXT 
50 VTAB 5i PRINT "TRACE WITH THE RIBHT ARROW 

«c <REPT> KEY.": VTAB 9: END 



COPY STOPPERS 

Everyone wants to know how to protect their disks -from 
copying, so they can quit their jobs and sell their 
computer programs. Well, quit your job anyway, but 
sooner or later EVERYTHING will be copyable. But don't 
•fret; the recording industry survives, doesn't it? As 
our -friend R. W, T. Sector once said, "You can't stop 
all of the people from copying a disk all of the time, 
but you can SLOW some of the people DOWN some of the 
time, depending on WHICH COPY PROGRAM they are using". 
With these wise words in mind, try this trick: 

A. Type " POKE 44033,16". 

B. Put a new disk in your drive and INIT it. 

What you have done is change the track of your catalog 
from 17 (normal) to 16. Other numbers, 3-15, will work 
too when poked into 44033. 

To transfer programs from a normal disk to your new 
disk; 

1. Boot a normal disk. 

2. LOAD a program from the disk. 

3. Type "POKE 44033,16" (assuming you used 16). 

4. Insert your protected disk, the one you INITed in 
step B above. 

5. SAVE the program. 

6. Type "POKE 44033,17" (that's normal). 

7. Insert your normal disk and continue with step 2. 

Remember, the little trick above won't work with all 
copy programs, and it won't stop anyone who knows much 
about, copy-protection. Copy-protect schemes that work: 
today art? EXTREMELY complicated (and they won't work 
next August ) . 

Another way to slow down copyers is with our 
program, DOS BOSS. It will change DOS commands and 
error messages for you, and slow potential copyers down 
quite a bit. 

The great race is indeed on between the Copyers and 
the Copy— Protectors. Progress is being .made every day 
in both camps, and, if you ree-ealy think about it, 
there can only be one winner-;- THE COPYERS. 
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Beagle Bros TipDisk 

Hey out there! Don't type in all of those programs from 
the Beagle Bros Tip Books! Here they are — typed, tested 
and ready to run — ALL DF THE PROGRAM LISTINGS FROM TIP 
BOOKS 1, 2, 3 AND 4! Many are useful; some are useless; 
ALL are interesting, li stable and copy-able. And each 
program teaches another elusive fact about making your 
Apple do its thing. No one around here has had time to 
count them all, but you can figure around four times as 
many programs as you have here in this Tip Book. The 
Two-Liners too, from all over the world (and elsewhere). 
Order now, and you'll have your disk in a few days! 

BEAGLE BROS TIPDISK #ls *20.00 





APPLE II COMMANDS 

















SINCE I GOT My 
BEA6LB BROS. COMMAND 
CHART. IVE ACQUIRED 

NEW W43 AND VIGOR ! 



An unsolicited endorsement 



ft *2.5Q FREEBEE 



We' ve 
Beagl 
Pokes 
the a 
1 ist 
want 
(don ' 
we '11 



retired the 
e Bros freebe 
Chart. We've 
ttic though, 
of 190 Apples 
one, send us 
t you hate it 
send you a C 



old Apple Command Chart as the head 
, and replaced it with our Peeks ?< 
still got plenty of Command Charts in 
really nice too — a handy alphabetical 
oft. Integer and DOS commands. If you 
*2.50 + 75 cents postage & handling 

when mail order places do that?), and 
ommand Chart right away. 



26 



Utility City Instructions 

AN OVERVIEW 

Welcome to Utility City! What you have here is a large 
collection of utilities that I'm sure you will find 
useful. I hope you can and will use them -for their 
intended purposes, AND to learn something about what 
makes your Apple tick. 

THE CATALOG 

As you will see in the catalog, many o-f the U-City 
programs <the ones that do something TO_ one of YOUR 
programs) consist of two or more files, usually a Text 
file and an Applesoft file. See the instructions for 
DOUBLE LOADER for an explanation of what's happening 
here. The file names that end in ".A" are the Applesoft 
programs that run AFTER you load one of your own 
programs and EXEC the text file (without the ".A"). If 
this sounds confusing, forget it. Just read the 
instructions for each program you use, and... 




You may LOAD them, LIST (most of) them, and change (most 
of) them, but RUNning them with no other program in 
memory will possibly foul up a pointer or two and crash 
around inside of your Apple (nothing serious). 

TRANSFERRING PROGRAMS TO OTHER DISKS 

Use the FID program on your System Master to transfer 
programs. Remember to transfer both the Text file AND 
the Applesoft file (with the ".A") when both exist. For 
example, to transfer the BFIND program, BRUN FID, and 
enter "BFTND=" as the file name. Now, both BFIND and 
BFIND. A will be copied for you. See your DOS Manual for 
more FID details. 

"WRITE " PROGRAMS 

The Applesoft files that end in ".WRITE" can be LOADed 
and then RUN to write a Text file to your disk. 

APPLESOFT ONLY. PLEASE 

Integer programs will not function with most of the 
files on this disk (except I NT CONVERT, which is an 
Integer program itself). 

LIMITATIONS 

I have tried to think of everything each program CANNOT 
do, as well as what it can do. 

BUGLIST 

Run the Buglist program on the U-City disk to see a list 
of the any changes, additions, or revelations we have 
encountered since this book was printed. 

Have some fun ! 
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Filename Zap 

WHAT IT DOES : Allows you to rename any -file with an 
invisible -file name OR with a trick file name made of 
any combination of inverse, flash St normal characters. 

HOW TO USE IT ; <1> SAVE your program on disk with an 
ordinary file name (no control characters please). <2> 
UNLOCK the file (or leave it unlocked). <3> RUN 
FILENAME ZAP. <4> Select from the options shown, and 
follow the instructions on the screen. 

LIMITATIONS ; < 1 > You can't have inverse or flashing 
characters in a file name that backspaces over itself 

(erases characters). <2> The only way you can load or 
run a file name with inverse or flash characters is from 
the immediate mode — Catalog and type LOAD or RUN, then 
trace over the file name in the catalog. <3> The only- 
way you can load or run an invisible file name is under 
program control. Your invisible file name's visible name 

(with CHR*(8)'s) will be displayed on the screen after 
the conversion is made. WRITE THIS NAME DOWN or remember 
it, or you might have end up with an inaccessible file. 
You can temporarily expose the ctrl-H's (backspaces) by 
running the CTRL-FIND program on the U-City disk. 

SUGGESTED USES : <1> Use inverse or flashing file names 
as decorative touches or accents to your catalogs. Don't 
overdo the flashing, o.k.? <2> Use invisible file names 
to disguise what's really on your disk. Some files, like 
binary files, need not be seen by the user, so why show 
them in the catalog? 

HOW IT WORKS ; <1> Inverse and flashing file name 
characters are recognised by DOS when you trace over 
them with the cursor. The program simply puts the names 
you want on the screen so you can trace over them to 
rename a file. <2> File names are made to erase 
themselves and/or file codes by inserting backspaces 
(ctrl-H's or CHR*(S)'s) into the name. Since DOS adds 
spaces after every file name to make it 30 characters 
long, these spaces follow your backspaces and ERASE 
whatever was on the screen. If you've got good opticals 
and watch carefully, you can see it happen! 



Command Zap 

WHAT IT DOES ; Allows you to put invisible commands or 
rem statements in your programs. 

HOW TO USE IT ; The best way is to type NEW, and try this 
test — Type in a Line lOOs 
lOO PRINT "GOTCHA!": REM^ 



28 



Type the """ immediately following the word REM, as 
shown above. When you LIST 100, a space will be added 
be-fore the This is important. When you LIST, you 

have — 

lOO PRINT "GOTCHA ! " : REM 

Now, from the left of the count each space and text 
character to the left. You should come up with 21. Now 
add 21 ■ 's plus the statement "IF X = 256 THEN BOSUB 
12345" immediately following the word REM (no space 
after the REM). Now LIST 100, and you should have — 
lOO PRINT "GOTCHA!": REM 

j F x _ 256 THE 

N GOSUB 12345 

Now EXEC COMMAND ZAP. When asked "Which Line?", enter 
100. When asked "Another Line?", answer N. Now LIST 100, 
and you should see — 

lOO IF X = 256 THEN GOSUB 12345 
RUN the program, and it will print — 

GOTCHA ! 

Your command executes, even though it has been hidden in 
the listing by a fake command. The fake command you see 
in the listing could be a rem statement or anything long 
enough to hide your command (the fake statement can't 
function since it. follows a rem). Make the fake command 
spaced the same way Applesoft would do it (notice the 
two spaces between "THEN" and "BOSUB") so everything 
looks authentic. Now type — 

SPEED=99: LIST 
The listing is slowed down so you can see your trickery 
in action! "SPEED=255" sets the speed to normal after 
the LIST. You can hide the LINE NUMBER too if you want. 
Just add five more "'"'s to make 26. Maybe try typing — 

lOO PRINT "GOTCHA!"! REM~ "^-'-K 

AAAAAAAAAAAAAAAAAAAJ|^|g Jg ' 26 S 

A NICE TITLE, ISN'T IT? 

EXEC COMMAND ZAP again. Then LIST. The command as well 
as the line number is now hidden! Longer line numbers 
will require more ''s, so count carefully. 

SUGGESTED USES : < 1 > Hide your name in your programs to 
identify illegal copies. <2> Hide commands that will 
bomb a program if any tampering is done. <3> Make rem 
statements that are more predominant and easier to read 
because they are flush left hiding the line number and 
the word "rem". 

LIMITATIONS ! You cannot hide a command longer than two 
or three words (it must be shorter than one line). 
CALLs, SOSUBs and GOTOs work just fine. 

HOW IT WORKS ; The program looks for '" : 's (token #94) in 
the selected line number, and pokes backspaces (ctrl-H's 
or token #8) in their place. Applesoft's LIST feature 
takes the backspaces literally and backs up. Your rem 
statement then overprints the real statement. 
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Line Search 



WHAT IT DOES ; Allows you to locate Applesoft program 
lines in memory. 

HOW TO USE IT : <1> LOAD your program and write down the 
line numbers you wish to find. <2> EXEC LINE SEARCH. 
<3> Follow the instructions on the screen. 



SUGGESTED USES ; Repair garbaged program lines, or make 
"illegal" changes to Applesoft programs (see "Token 
Tricks" in this book). 



LIMITATIONS : Line Search will not work on Integer BASIC 
programs, since the language structure is entirely 
different from Applesoft. 

HOW IT WORKS : Let's take a look at a very small program. 
Type this in and follow along — 

1 REM COUNT 

2 FOR 1=1 TO lO 
lOO PRINT I: NEXT I 
lOOO PRINT "END": END 

Line Search first finds the start of your program by 
PEEKing at locations 103 & 104. Try it yourself — 

PRINT PEEK (103) + PEEK < 1 04 ) *256 
This will usually give you a 2049 or hex *801. Now find 
the END OF PROGRAM with — 

PRINT PEEK < 175) + PEEK < 176) *256 
The longer your program, the higher this number will be. 
In this case, we get 2097 or he;: *831. Now, let's look 
at the entire program in the monitor, by listing just 
before and just after the start and end points — 

CALL -151 

*SOO. 832 

You will now see something like — 
800- OO OC OS Ol OO B2 43 4F 
80S- 55 4E 54 OO 18 OS 02 OO 
810- 81 49 DO 31 CI 31 30 OO 
818- 21 08 64 OO BA 49 3A 82 
820- OO 2E 08 E8 03 BA 22 45 
828- 4E 44 22 3A SO OO OO OO 
830- OA 4E 44 

Each two-digit hex number above represents part of your 
program; a line number, character or command token. 
Let's take a look at each one — 



Location Value 

800 00 There is always a zero before the 

start of a program. 

801-802 OC 08 These two numbers tell us that the 

NEXT program line starts at location 
*080C (Apple's two-byte hex numbers 
are always backwards in this strange 
form) . 

803-804 01 00 This is the first Line Number, 1 
( 000 1 ) . 
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805 



E2 



806-80A 43 4F 55 
4E 54 



SOB 




00 




80C- 


-80D 


1 8 


08 


80 E - 


•-80F 


02 


(-)(-> 


8 i o 




8 1 




Sit 




49 




S ^ y 








PIT 
O A 




.L 




S 1 4 








PI l=i- 




V.' .1 


-r - 


817 




oo 




818- 


-819 


21 


OS 


81A- 


-8 IB 


64 


00 


8 1 C 




BA 




81 D 




49 




S1E 




30 




8 1 F 




82 




820 




00 




821- 


-822 


2E 


08 


823- 


-824 


E8 


03 



825 
826 

827-829 

82A 

82B 

82C 

82D 

82E-82F 
830-832 



BA 

45 4E 44 

3A 
80 
00 

00 OO 



This is the symbol or TOKEN tor the 
word "REM". Each word Applesoft knows 
has a token number. 
These five numbers are the ASCII 
values -for the characters C-0-U-N-T . 
A zero token means end of line, so 
Line 1 is -finished. 

This is the start of the next program 
line, the location that was referred 
to up in 801. The values 18 s< 08 tell 
us that the NEXT proqram line starts 
at *818. 

Line number 2 <*0OO2) . 
Token for FOR. 
Character "I". 
Token for " . 
Character "1". 
Token for TO. 
Characters "1" s ( "t; 



. Applesoft 
handles numbers in a program as words, 
spelling them out digit by digit. 
End of line. 

Next line starts at *821. 
Line number 100 (*0064). 
Token for PRINT. 
Character "I". 
Character " : " . 
Token for NEXT. 
End of 1 i ne. 

Next line starts at *82E:. 
Line number 1000 (*3E8> . 
Token for PRINT. 
Quote mark. 
Characters "£'", 
Quote mark. 
Character " s " 
Token for END. 
End of line. 
Two zeros as at 
program. 

Could be part of 



"N" 8< "D" . 

this point mean end of 
an old program. 



TAKING OUT THE GARBAGE 

Occasionally, a program will be zapped by mysterious 
forces and become inoperable. In the listing, you will 
find illegal line numbers or nonsense statements, like 
"C0L0R= B0SUB HF'LOT " . What has probably happened i s that 
ONE BYTE has been changed in a line number or LINE 
LOCATION NUMBER. If the latter is true, your program 
will jump to where it's told which is now some random 
place in memory. The numbers it finds there are 
interpreted as tokens, and thus the garbage. Use Line 
Search to find the memory location of the garbaged line 
and/or the last good line in the program. Check the pair 
of numbers just before each line number. Each one should 
point to a location JUST AFTER A 00 (the end of the 
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current line). When you -find an incorrect number, poke 
in a correct one. For example, to poke a 100 ($64) into 
location 2049 (#801), type POKE 2049,100 OR enter the 
monitor with a CALL--151, and type 801; 64. 



Applesoft Tokens 



Hex ! 


Dec 




Hex Dec 


Chr 


Hex 


Dec 


Token 


Hex 


Dec 


Token 


$on 


o 


cS> 


S40 


64 


S> 


#80 


128 


END 


SCO 


192 


TAB < 


*01 


i 


cA 


*41 


65 


A 


#81 


129 


FOR 


*C1 


193 


TO 


#02 




cB 


#42 


66 


B 


$82 


130 


NEXT 


*C2 


194 


FN 


$03 


3 


cC 


#43 


67 


C 


$83 


131 


DATA 


#C3 


195 


SPC( 


*04 


4 


cD 


#44 


68 


D 


#84 


132 


I NPUT 


*C4 


196 


THEN 


#05 


5 


cE 


#45 


69 


E 


#85 


133 


DEL 


$C5 


197 


AT 


#06 


6 


cF 


#46 


70 


F 


$86 


134 


DIM 


$C6 


198 


NOT 


#07 




cS 


#47 


71 


S 


#87 


135 


READ 


$C7 


199 


STEP 


#08 


8 


cH 


#48 


72 


H 


#88 


1 36 


BR 


$C8 


200 


+ 


#09 


9 


cl 


#49 


73 


I 


#89 


137 


TEXT 


$C9 


201 


— 


$OA 


10 


cJ 


*4A 


74 


J 


#8 A 


138 


PR# 


$CA 


202 


* 


$0B 


1 1 


cK 


*4B 


75 


K 


*8B 


139 


IN# 


$CB 


203 


/ 


$OC 


12 


cL 


#4C 


76 


L 


*8C 


140 


CALL 


$CC 


204 


AND 


SOD 


13 


CM 


*4D 


77 


M 


$8D 


141 


PLOT 


*CD 


205 


*0E 


14 


cN 


#4E 


78 


N 


*8E 


142 


HL I N 


*CE 


206 


OR 


$OF 

* i 


15 


cO 


*4F 


79 





#8F 


143 


VLIN 


SCF 


207 




16 


cP 


#50 


80 


P 


$90 


144 


HBR2 


#D0 


208 


= 


* I J. 


1 "7 


c£? 


#5 1 


8 1 


Q 


$9 1 


145 


H6R 


*Dt 


20s> 


SGN 


*12 


18 


cR 


#52 


82 


R 


$92 


146 


HC0L0R= 


*D2 


210 


*13 


19 


cS 


#53 


83 


S 


#93 


1 4 7 


HPLOT 




X.. 1 1 


T KIT 


#14 


20 


cT 


#54 


84 


T 


#94 


1 48 


DRAW 


$D4 


V j 


ADD 


*15 


21 


cU 




85 


U 


#95 


149 


. . -~ .... -■ | * 


$E>5 


- ■[ i' 


1 ICC' 


#16 


22* 


cV 


-t>i_.'0 


86 


V 


#96 


1 50 


HTAB 


$D6 


2 1 4 


IITOET 

r ht 


* 1 7 


23^ 


cW 




87 


W 


$97 


1 51 


HOME 


$D7 


2 1 5 


SCRN ( 


#18 


24 


cX 


$58 


88 


X 


*V8 


152 


ROT - 


SD8 


216 


PDL 


#19 


25 


cY 


$59 


89 


Y 


#V9 


1 53 


SCALE— 


$D9 


2 1 7 


PDS 


*1A 


26 


cZ 


*5A 


90 


^ 


$9A 


1 54 


SHLuAD 


$DA 


2 1 8 


SQR 


*1B 


27 


cC 


$5E< 


91 


C 


$9B 


1 55 


TRACE 


$ I.) Ei 


2 1 S* 




*1C 


28 


c\ 


S5C 


92 


\ 


$9C 


1 56 


iv i (-*■ t" r'i /\ i~- 11"' 


$DC 






SID 


29 


c J 


*5D 


93 


1 


#9D 


1 5 / 


MHDMAI 

NUhnHL 


* "A V't 


' i 




S1E 


30 


c "• 


$5E 


94 




#9E 


1 58 


T kll JC'DC cr 
1 N V 'c. rK S3 c. 






t_- LJ O 


*1F 


31 


c_ 


#5F 




_. 


$9F 


1 59 


FLASH 






d T M 
C) i. t *J 


$20 


3T J 


sp 


$60 


96 




*A0 


160 


COLOR- 


$EO 


224 


TAN 


#21 




1 


$61 


97 


a 


$A1 


161 


POP 


$E1 


2^5 


ATN 


S22 


34 




$62 


963 


b 


$A2 


162 


VTAB 


$E2 


226 


PEEK 


#23 


t^; 


# 


#63 


99 


c 


$A3 


163 


HI MEM: 


$E3 


1 


LEN 


$24 


36 


t 


#64 


1 OO 


d 


$A4 


164 


LOMEM: 


$E4 


228 


STR$ 


S25 


37 




$65 


1 1 


e 


$A5 


165 


ONERR 


$E5 


229 


VAL 


*26 


38 


c. 


$66 


1 o2 


f 


$A6 


166 


RESUME- 


$E6 


2 30 


A3C 


#27 


39 


' 


$67 


1 03 


g 


*A7 


167 


RECALL 


$E7 


231 


CHR* 


$28 


40 


( 


$68 


1 04 


h 


*A8 


168 


STORE 


$E8 


^32 


LEFT$ 


S29 


41 


) 


$69 


1 05 


i 


*A9 


16*? 


SPEED= 


$E9 


23^3 


RIBHT* 


S2A 


42 


* 


$6A 


1 06 


i 


#AA 


1 70 


LET 


$EA 


234 


M I D$ 


*2B 


43 


+ 


$6B 


107 


k 


*AB 


1 7 1 


GOTO 








S2C 


44 




*6C 


1 08 


1 


*AC 


172 


RUN 








*2D 


45 


_ 


$6E> 


1 09 


m 


#AD 


173 


IF 








S2E 


46 




$6E 


1 1 


n 


*AE 


174 


RESTORE 








$2F 


47 


./ 


#6F 


111 


o 


$AF 


175 










*30 


48 


t'y 


#70 


112 


P 


$B0 


176 


GOSUB 








$31 


49 


1 


#71 


113 


q 


$B1 


177 


RETURN 








S32 


50 




#72 


1 14 


r 


$B2 


178 


REM 








♦33 


51 




$73 


115 


s 


$B3 


1 79 


STOP 








S34 


52 


4 


#74 


1 1 6 


t 


*B4 


1 80 


ON 








S35 






$75 


117 


u 


*B5 


181 


WA I T 








$36 


54 


6 


$76 


118 


V 


$B6 


182 


LOAD 








$37 


55 


7 


#77 


1 19 


w 


*B7 


183 


SAVE 








S38 


56 


8 


$78 


1 20 




$B8 


184 


DEF 








*39 


57 


9 


#79 


121 


y 


$B9 


185 


POKE 








S3A 


58 




*7A 


122 




*BA 


186 


PRINT 








S3B 


59 




*7B 


123 


"i 


*BB 


187 


CONT 








*3C 


60 




*7C 


124 




$BC 


188 


LIST 








S3D 


61 




*7D 


1.25 




*BD 


189 


CLEAR 








43E 


62 




$7E 


126 




*BE 


190 


GET 








S3F 


63 




*7F 


127 




$BF 


191 


NEW 
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TOKEN TRICKS! 



TOKEN LISTERS 

These two programs zap their first lines and then list 
them. Both are nice demos of Applesoft's token system. 



lO REM <-LOOK AT THIS 

20 HOME :Q = - 16384 

30 START = PEEK (103) + PEEK <104> * 256 
40 VTAB lO: PRINT " THIS IS LINE lO — " 
50 VTAB 15: PRINT "HIT ANY KEY TO END. " 
60 FOR X = 234 TO 32 STEP - 1 
70 POKE START + 4,X 
80 VTAB 11 

90 CALL - 868: LIST lO 

lOO FOR I = 1 TO 40 

HO IF PEEK <Q> > 127 THEN 130 

120 NEXT I,X 

130 POKE - 16368, O: LIST 



CONTROLAT 

Remember how a zero ENDS a program line? You can end one 
anywhere you want by poking a zero (ctrl-3) into the 
middle of it. Experiment with listing and running after 
you have done your poking. 



LIST PREVENTION 

POKE 2049,1 will make LIST list your first line 
repeatedly, because you have told the Apple that the 
NEXT LINE starts at *S01 instead of *8-somethi nq else. 



DENUMBER 

This program will ruin itself, so SAVE before you RUN! 



lO: LIST 



REM EXPANDER C^Lpf -hew please) 

Watch this! A RUN changes the A' s A to all kinds of rude 
error messages. A SOTO 100 repairs everything. 

lO REM AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA 
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA 
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA 
AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA 
AAAAAAAAAAAAAAAAAAAAAAAAAAAAA 

20 N = 234 

30 FOR I = 2054 TO 2287: N = N + 1: IF N > 251 THEN N = 2 

35 

40 POKE I.N: NEXT : LIST : END 

lOO REM GOTO lOO TO FIX. _ T 

HO FOR I = 2054 TO 2287: POKE I, ASC ("A"): NEXT : LIST 

: END 
200 REM 

REM EXPANDER 



lO GOTO 256 
256 TEXT : 
2053, I : 
2051, 10 




lO 
20 
30 
40 
50 
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Screenwriter 



WHAT IT DOES ; Lets you compose text screen layouts; 
including inverse, -flash St normal type; and centered, 
■flush left S.: right copy; directly on the screen. These 
screen layouts may be saved to disk, and loaded into 
programs whenever you wish, thus saving program memory 
and programming time. 

HOW TO USE IT ; Run the program. It will ask if you want 
to load a file. A file, in this case, is an actual 
binary image of a text screen layout. If you are just 
learning, answer " N " and practice typing as you read 
along. You will now be asked to "stand by", so do as you 
are told. The Apple is reading the screen at this point 
to set up a new file. 

WPINb MODE is indicated by a flashing " " or 
cursor on the screen. You may type copy as you normally 
would in any of the text screen's <*&0 locations <HTwB 
1-40 VTAB 1-24). The carriage return will put the 
cursor at the left mar q in on the iie>-t I ine down. 

INVERSE, FLASH and NORMAL, typi- is accomplished by 
pressing CTRL— T » C TRL--F or CTRL— N for the appropriate 
format. A brief note will appear at the lower left of 
the screen. . 



CURSOR MOVES without typing are made with the left 
it right arrows and the Ctrl -A & ctrl-Z keys. To 
jump rapidly about the screen, press ESC and then the 
appropriate cursor key . You will need to press ESC and 
the key for each jump you want to make-?, 

SPECIAL CHARACTERS without keys may be typed too. 
The left square bracket is typed by pressing CTRL-- 3 
(ctr 1 -shi f t— M> . The underscore is typed with a CTRL-L. 
The backslash is typed with a CTRL-X . 

LOWER CASE is turned off and on with CTRL-S. The 
cursor will be a flashing " " for lower case and a 
flasing for upper case. If you don't have a lower- 

case chip in your Apple, the lower case mode will only 
produce miscellaneous characters. Press CTRL— S and you 
will be typing in upper case? again. 

CTRL-C will give you access to Screenwriter's many 
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commands. A letter corresponding to each command will 
appear at the bottom of the screen in cryptic form 
(C/S/H/L/ M/P/Q/S) . To find out what these command letters 
stand for, type H (for Help ) ■ Now you will see an 
explanation of each letter. Any key will return you to 
typing mode. 

CTRL-C+C, wi 1 1 let you c 1 ear the screen or a line or 
column of type. Follow the instructions on the screen. 
If you answer "N" to the question "O.K.?", your cleared 
line or column will be restored. 

CTRL-C+M, will let you move text on the screen. The 
computer will ask you if you want to move a BLOCK of 
text or if you want to FORMAT text. 

Bl oc k movement is achieved by answering "B", and 
then selecting opposite (diagonal) corners of the 
block you want moved. Then select the upper-left 
corner of the new block location, and let the 
program do its thing. 

Format ting means making your text flush left, right 
or centered on the screen. You may format one line 
at a time or the? entire screen. Follow the screen 
i nstruct i ons. 

CTRL-C+G will flash a text screen grid on top of 
your screen copy so you can see where the edges of the 
screen are. The four lines of text available below hi- 
or lo-res graphics are indicated by a thicker horizontal 
line between vtab 20 and 21. Any key will turn the grid 
off . 

CTRL-C+L. lets you 1 pad a file from disk. If you want 
to see the catalog at this time, type "CATALOG". 
Warning: Whatever type was on the screen will be ERASED 
by a catalog. 

CTRL-C+S lets you save text to disk. You cannot 
access the catalog after a ctrl-S. If you need to see 
the catalog at this time, SAVE the screen under the name 
"TEST" or something, select ctrl-L, and type "CATALOG". 
Later you may rename TEST anything you want. 

CTRL-C+P_ lets you dump the type on the screen to 
your pr i nter ■ You will need to turn your printer on and 
enter its slot number when asked. Inverse and flashing 
characters will, of course, appear as normal in the 
pr i ntout . 

SUGGESTED USES : Screenwriter lets you construct 
attractive screen layouts without having to use PRINT 
statements, VTAB, HTAB, INVERSE and the like. If you 
want, you can dump your composition to your printer and 
construct your print, statements from there. The most 
efficient thing to do, however, is store your text 
layouts on disk and then call for them when appropriate 
from your BASIC program. A simple PRINT CHR* ( 4 ) ; " BLOAD 
(name of file)" will do it. You may rename your files, 
of course. You might want to name them all starting with 
the character "S>" or """" to indicated their type. Or you 
could end all text screen files with ".T", as in 
"MENU. T" . 
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In* rnnu»it»r Note: Your Apple must have Integer Basic 
VOnVeiTCr language capabilities to use this program. 

WHAT I T DOES : Converts Integer BASIC programs to 
Applesoft BASIC without correcting syntax. 

HOW TO USE IT : Load Int Converter and insert a disk with 
your Integer program on it. Then type RUM (return). Using 
the right, arrow key, trace over the load command on the 
screen, and hit return,. Then trace? each of the two 
program lines, 32766 and 32767, hitting return after 
each. Then trace the "GOTO 32766". A text file will now 
be created by your Apple; give it some time. Now trace 
over both the FP and EXEC commands on the screen. An 
Applesoft file will then be created from the tent file. 
You may now delete the text file and save the Applesoft, 
■file that in memory, even though it probably won't work. 

You must now correct the Integer synt.au to conform to 
Applesoft. Every "TAB", for instance, must be changed to 
" H TAB " ,. Every not-equal s "#" must be changed to "<,>", and 
so on. The easiest way to do this is with Southwestern 
Data's "Apple? Doc" disk; ask your dealer. It's a, great 
program with many other uses. Another program that we 
highly recommend is 'Synergistics' Global Program Line 
trli tor . 

Here is a list of the commands you will have to 
change when converting Integer to Applesoft — 
Integer f^EEl?!!?!* Equivalent 

TAB HTAB 
# (not equal ) 

X MOD Y X - 1 NT ( X / Y ) * Y 

X/'Y INTtX/Y) 

RND ( X ) I NT ( RND ( 1 > *X> 

A* i LEN ( A* ) + 1 ) = A*-"A* + 

A*(X,X) MID* (A*, X, 1 > 

A* (4,6) MID* ( A* ,4,3) 

A* (1,3) LEFT* (A*, 3) 

BOTO A* 100 ON A GOTO 100,200... 

B0SUB A*. 100 ON A G0SUB 100,200... 

INPUT "HUH?" ,W INPUT "HUH"sW 

PR I NT ASC ( A* ) PR I NT ASC < A* ) + 1 28 



AND THE BIB DIFFERENCE : In Integer, if an IF statement 
is NOT true, the rest of the program line IS executed. 

SUGGESTED USES : Convert Integer programs to Applesoft. 

LIMITATIONS : You can't easily convert Applesoft to 
Integer, unless you. repair all syntax first, a rather- 
buggy job. 

HOW IT WORKS : The program writes a text file of the 
Integer listing. When exec'd from Applesoft, each line 
enters itself as if typed directly from the keyboard. 
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Bfind . , ,H f 

WHAT IT DOES : Finds the starting location and length ot 

the most recently BLDADed file, and converts each to hex 
and decimal. 

HOW TO USE IT ; < 1 > BLOAD the file in question. <2> EXEC 
BFIND. 

SUBBES TED USES : You need the start address and length of 
a binary file in order to BSAVE it to another disk. Save 
a binary file by typing " BSAVE F I LE , A* < s > , L* < 1 > " wher e 
(s) is the start address and (1) is the length. Omit the 
*'s if you are using decimal numbers. 

LIMITATIONS : You must BLOAD the program in question 
immediately before you EXEC BFIND. 

HOW IT WORKS i BFIND peeks at DOS locations 43616-17 and 
43634-35 and converts the values there to hex. 



Sortfile 

WHAT IT DOES : Sorts alphabetically and stores lists of 
items on disk. 

HOW TO USE IT : Run Sortfile. Hit K any time you want to 
see all of the options. <N>EW FILE will erase any 
existing file from memory letting you start a new tile. 
,p>EJ iet= you load a file from disk into memory. < b,-AVE 
ltts~you save the file in memory to disk. <A>Du ITEM 
lets you add one or more items that, will be inserted 
alphabetically into your file. <D>ELETE ITEM lets you 
remove an item from your file. <R>ENAME I TEN lets you 
change the name of an item or file. <L>IST prints a full 
or partial list of your file to printer or CR r . 
,- c >ATALQS lets vou view your disk catalog. B ; U 1 1 l et s 
you quit. Be sure to save your file before you quit or 
it could be lost. GOTO 9999 will re-enter the program 
retaining your file. RUN will erase your file. 

PRI NTER NOTES : If your printer is connected to other 
than slot W, change the slot value at the start of the 
program. 

SUBPE STED USES : Use Sortfile for small lists, class 
rosters, etc., that you want to store and update from 
time to' time. Sortfile may be changed to fit your needs. 

LIMITATIONS: You must know the number of an item in 
order to rename or delete an item. To find the number, 
simply list all or part of your file. 

HOW IT WORKS: Normal DOS text files and string arrays 
are used. List it and see. 
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Connect 

WHAT IT DOES; Joins two Applesoft programs together to 
make one larger program. 

HOW TO USE I T ; < 1 > Save your H I 6HER— numbered program on 
the same disk with the "Connect" program. -•: 2> Load your 
LOWER-numbered program into memory. <3> Tvpe— 

A*="HIBH# FILENAME" 
(use the actual file name). <4> EXEC CONNECT, and let 
the program do its thing. You will get an "Append 
Complete" message when it is through. If you forgot Step 
3, you will still get the message, but it will be a lie! 

SUSGESTED USES : Append often used routines (music pokes, 
sorters, copyright messages, etc.) to your programs. 

LIMITATIONS ; < 1 > It's up to you to renumber your 
programs so that their line numbers don't overlap. Use 
the program called "RENUMBER" on your Apple System 
Master Disk. If your numbers do overlap, the appended 
program will probably be worthless. It is a good idea to 
keep your two original programs until you are sure all 
is o.k. <2> You could get a Memory Full error if your 
programs are too large. Before you load your 
smal 1 -numbered program, it's a good idea to set the 
Start of Program pointer as low as possible by typinq 
FP. 

HOW IT WORKS ; < 1 > The START of Program pointer (for the 
smal 1 -number program) is changed to just beyond the END 
of the program. < 2 > The large-numbered program is 
loaded at the newly specified location. <3> The Start, 
of Program pointer is set back where it was originally. 

CONNECT WRITE ; To put "Connect" on your own disks, load 
the program called "Connect Write". Then put each disk 
in your drive, and RUN. 



Text Dump 

WHAT I T DOES ; Allows you to transfer your text screen to 
your printer. 

HOW TO USE IT; < 1 > Append Text Dump to your program with 
the "Connect" program on the U-City disk. <2> At the 
point in your program where you would like the text dump 
to begin (when the screen is full or as you like it), 
insert a GOTO 63990. <3> Turn on your printer, and run 
your program. 

SUGGESTED USES ; Use Text Dump to make printouts of 
screen formats where a long series of PRINT statements 
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would take too long to produce. 

LIMITATIONS : < 1 > You cannot have? any line larger than 
63990 in your program. <2> If your printer is connected 
to other than slot 1, change Line 63992. <3> The top 
line on the screen, not. the printout, will be messed up. 
<4> Inverse and Flash will print as Normal type on your 
pr i nter . 

HOW IT WORKS ; < 1 > Each screen location is peeked. <2> 
Flash, Inverse and Normal values are shuffled to make 
them all Normal. <3> Each location is printed onto to 
text line one, and therefore to your printer. 



Rem Zap, REM FIND and CTRL-FIND 

WHAT THEY DO : Rem Zap allow you to convert (almost) 
normal rem statements to sometimes visible, sometimes 
invisible, inverse rem statements in your listings. Rem 
Find and Ctrl-Find are identical and make the rems 
i nvi si bl e. 

HOW TO USE THEM ; <1> Load an Applesoft program and enter 
a rem statement. < 2 > Write down or remember the line 
number, and EXEC REM ZAP. <3> Enter the line number (s) 
that have rems you want converted to inverse, and Quit. 
Now RUN REM FIND (or Ctrl-Find). Your rems will be 
converted to inverse in your listing. The big drawback 
is that a PR#0 or RESET will make the rems invisible! 

SUSSESTED USES : < 1 > Fool your friends. <2> Fool your 
enemies. <3> Hide secret messages in your programs. <4> 
Make some rems that really stand out. 

LIMITATIONS ; We've saved the worst for last — Rem Zap 
won't zap numbers, spaces and other nearby characters or 
M's. All M's will appear normal in your listings. S's 
will zap, but beep when they are invisible. J ' s will do 
a line feed. 

HOW THEY WORK : In case you haven't guessed, Rem Zap 
converts your rem statement's characters (ASCII 64-95) 
to CONTROL— CHARACTERS . Rem Find (and Ctrl-Find) are 
simply programs that expose Ctrl -characters as inverse. 
After you run Rem Find or Ctrl-Find, you will be able to 
see ctrl -characters in your catalog listings. Try typing 
an illegal statement, like "AFLJK" (return).. Instead of 
an audible ?Syntax Error beep you will see an inverse 6 
on the screen. That explains why the G's in your 
listings beep if you haven't exposed them with Rem Find. 
M's can't be zapped because ctrl-M is a carriage return. 
Listings get really weird looking without carriage 
returns ! 
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Address Checker 



WHAT I T DOES ; Address Checker is a learning tool that 
scans a selected range of addresses and compares and 
flashes decimal values that have changed since the last 
scan. If you are a beginner, you can learn quite a bit 
about how the Apple stores values in memory. Use Address 
Checker while referring to your Peeks S< Pokes Chart. 

HOW TO USE I T : Here's a sample run on Page Zero 
(addresses 0-255, where most of the action is): < 1 > RUN 
ADDRESS CHECKER. <2> Select R. You will see about HO 
addresses and their peeked values printed on the screen. 
<3> Select C. Enter the command " COLOR** 1" (return). <4> 
Trace over the "C0L0R=1 ; GOTO 40" statements with the 
cursor. <5> Watch the screen and notice the numbers. 
The ones that flash are the values that are DIFFERENT 
from the previous scan. The value at location 48 is 
probably flashing if you changed the COLOR value. 
Location 48 always stores a value equal to 17 times the 
current COLOR value. Locations 78 and 79 usually always 
flash because they produce a random number for 
Applesoft. Select R again and 48 will not flash because 
its value did not change. You may scan any memory range 
you wish with an A keypress. Addresses and values will 
print until the screen is full. No numbers will flash 
until the second consecutive scan. 

It's best not to POKE around on Page Zero unless you 
know what you're doing, so change the start address to 
768 (*300) . Now you can see what a POKE does. Select C 
and enter "POKE 780,123" (you CAN enter commas!). Do the 
trace and watch. Only location 780 will be flashing, 
hopefully with the 123 you poked in. 

LIMITATIONS ; < 1 > Certain values (like those at locations 
50 and 51) that you change with pokes will be RE— CHANGE/' 
when you run the program, so they won't flash. <2> 
Certain commands like CALL-151 won't work either for 
obvious reasons. <3> DON ' T LOOK AT , AROUND OR NEAR 
LOCATION 49257 ! Everything will ex pi ode. If you intend 
to do this anyway, hide ALL of your disks in the 
refrigerator, and watch the monitor from behind your 
chair., You have been warned. 

SUGGESTED USES; Do some memory snooping. Notice what 
happens where. Many of the values and locations on the 
Peeks Pokes Chart were determined using this program. 

HOW IT WORKS; Each location is peeked and put in an 
srrsy ( E ( A ) ) . It is then compared with the previous 
value <A(A)). List, it and see. 
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Multi-Cat 



WHAT IT DOES : Allows you to send catalogs to your 
printer or CRT in any page width and any number of 
catalog columns. 

HOW TO USE IT ; Run Multi-Cat. You will be asked 
questions regarding printer or screen catalog, page 
width and number of catalog columns. "Print File Codes?" 
asks if you want to display the normal lock/unlock code, 
A/I/B/T file code and Elector numbers. Vertical spacing 
refers to single, double or whatever spacing. The 
numbers you select (except vertical spacing) will 
determine the number of characters that will be 
displayed in your file names. If you have all short file 
names, this will probably not concern you. The length of 
file name number will be displayed on the screen. It 
will flash as a warning if it gets below 3. The only way 
to change this number is to change one or more of the 
other options. You can lengthen your file names by- 
selecting fewer catalog columns or a wider page width or 
by eliminating file codes. The options mentioned here 
will be automatically requested only on your first 
catalog. Thereafter, you may still change parameters by 
selecting option C. 

SUGGESTED USES : Make hard copy printouts of your long 
catalogs. The multiple-column feature allows you to 
print more file names per page. 

LIMITATIONS ; <1> A FILE NOT FOUND error will occur if 
you attempt to access a shortened file name. <2> DO NOT 
HIT RESET during the catalog. You will mess up DOS and 
possibly need to re— boot. 

HOW I T WORKS ; DOS is altered according to your 
specifications (as in Dos Boss). The number of files is 
counted, and the catalog is printed. Then DOS is reset, 
to normal. In case you didn't know, a NORMALLY— FORMATTED 
catalog may be sent to your printer by typing 
"PR#(slot)" and "CATALOG". 



Key-Cat 

WHAT IT DOES : Lets you select and run programs with one 
keystroke from your catalog, and quickly find the amount, 
of space free on a disk. 

HQW TQ USE IT : Run Key-Cat. You will see a normal 
catalog. If you have more than 17 file names on your 
disk, the catalog will pause as usual when the screen is 
full. Press any key to continue, OR, if you see the file 
name you want on the screen, PRESS < RETURN >, and 
selection letters will appear to the left of each file 
name. Now press the key you want, and the appropriate 
file will RUN, EXEC or BRUN, depending on whether it is 
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a BASIC, TEXT or BINARY file (see Limitations below). 

To quit Key-Cat, select a _2_. To -find sectors used 
(SEC USE) and sectors -free (SEC FRE) , hit a# (shi-ft-3) 
when the key letters are on the screen. 

SUSBESTED USES : Use Key-Cat as your Hello program on 
your disks. Save it under the file name "N" . Then you 
can simply type RUNN (2 N's) to run it. To make Key-Cat 
(or N) run when you boot your disk, you must change the 
name of your greeting program to Key-Cat (or N) . To do 
this, BRUN MASTER CREATE from the System Master disk (or 
BRUN UPDATE 3.2.1 if you have DOS 3.2). Instructions are 
in your DOS Manual. 

LIMITATIONS : <1> If you select a binary file such as a 
hi -res picture, that is meant to be BLOADed, not BRUN, 
it will crash when you select it with Key-Cat. <2> 
Likewise, all te:;t files aren't meant to be EXEC'd, and 
those that aren't will crash. <3> If you select a 
program with flashing, inverse or control characters in 
its file name, Key-Cat won't recognize it, and the error 
will cause Key-Cat to re-catalog. 

HOW I T WORKS : Key-Cat actually reads the screen, 

1 etter-f or-1 etter (not the disk), to get the selected 

file name. 

ADDITIONAL FEATURE : If you would like normal file codes 
to appear along with the selection letters, change Line 
20 in Key-Cat to — 
20 C0L=1 

Actually, COL, the column in which the letter will 
appear, can be 1 , 3, 4 or 7. C0L=0 will cause no sector 
codes to show and change B, A, I Z< T to *, 1, > S< ". If 
these special codes are i nverse, the file is locked. 



Kill-Cat 

WHAT IT DOES : Makes ctrl-C (or any key you choose) make 
a clean break in a partial catalog. Any other key will 
continue the catalog as usual. 

HOW TO USE IT : Run Kill -Cat. You may change Line 20 if 
you want a key other that ctrl-C to stop the catalog. 
For example, enter KEY*=CHR* ( 13) for <return> or KEY*=" ' 
for space or KEY*="S" if you want S to stop your 
catalog. For some reason, ctrl-C and no other key will 
let you kill a catalog even BEFORE the screen is full. 

SUSBESTED USES : Append Kill-Cat to your greeting 
programs so you can utilize its feature each time you 
boot your system. 

LIMITATIONS: None that we know of. The small "wait for a 
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keypress" routine is placed at location *BA69 (for 48K) 
in DOS. As far as anyone around here knows, it is 
unused . 

HOW IT WORKS: Kill-Cat tells DOS at location *AE63 to 
jump to location *BA69 and check for a ctrl-C press 
instead of jumping to location *FDOC to see if ANY KEY 
is pressed as it normally does. 



Double Loader 

Read this carefully and take notes. Then rewrite i t so 
it makes sense to you. 

WHAT IT DOES ; Creates a TEXT FILE X which, when EXEC'd, 
will RUN Applesoft Program P, while any other Applesoft 
Program stays in memory. 

HOW TO USE IT : < 1 > Run Double Loader. < 2 > Enter the 
names of the two programs, A and P, described above. 
Stand by while text file X is written. <3> Add the 
fol lowing line of commands to the end of Program P (with 
a line number 5 be sure the program GETS TO these 
commands) : 

LOC=768s POKE 103, PEEK (LOO : POKE 104, PEEK(LOC+l>! 
POKE 175, PEEK<LOC+2>! POKE 176, PEEK<LOC+3)s END. 

< 4 > With any Applesoft program in memory, EXEC (file X 
Name), and Program P will run. When it ends, the pokes 
in step 3 will be executed and your original program 
will be restored. 

SUGGESTED USES : Use Double Loader for utilities or 
subroutines you often use while programming, but don't 
want appended to your programs. Without Double Loader, 
you would have to SAVE your program, RUN your utility, 
then RELOAD your program. Many of the programs on 
Utility City use this "double load" method. 

LIMITATIONS : If you reset, or ctrl-C out of a program, 
the end pokes will not be executed, and your original 
program will not be accessible, although it is still 
there in your Apple's memory. If this happens, do a GOTO 
to your end line (see #3 above). 

HOW IT WORKS : <1> The original Start of Program pointers 
are stored in locations 768-769 <*300-301). <2> The 
original End of Program pointers are stored in locations 
770-771. <3> The END of Program pointers are poked into 
the START of Program locations 103-104. <4> A zero is 
poked into the new Start of Program location minus 1, 
and Program P is loaded. In other words, Program P is 
sort of APPENDED to your original program. When you are 
finished with Program P, the pointers are restored to 
their original values. 
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Run Counter & Run Dater 

WHAT THEY DO : Run Counter updates a number in your 
program listing, reports on the screen how many times it 
has been run, and re-saves your program with the updated 
run-number prior to program execution. Run Dater works 
similarly; it tells you the last date on which your 
program was run, asks -for today's date, and re-saves 
itself with the new date, before execution. 

HOW TO USE THEM ; < 1 > Using the Connect program on the 
U-City disk, append your Applesoft program to either Run 
Counter or Run Dater. (Load Run Counter. Type 
A*="PROGRAM NAME". EXEC CONNECT.) Your program must have 
NO LINE numbered smaller than 17, so you may have to do 
a little re-numbering BEFORE you append. DO NOT RENUMBER 
RUN COUNTER OR RUN DATER, or they may bomb. <2> Add 
your program's name between the quote marks in Line 11. 
'*' 5 > You may want to change Line 10 in either program. It 
contains the counter that is updated each time you run 
either program. Make these changes carefully in the 
format shown. You may remove the REM statement. DO NOT 
add any program line numbered smaller than 10. < 4 > Save 
your program. It will now run normally after it re-saves 
itself with its updated information. 

SUGGESTED USES : Use both programs to keep track of what 
use your disk library is getting. 



CHR$ Poker 

WHAT IT DOES: Finds and returns a number for each text 
screen location in memory and each printable character, 
ASCII 0-255. 

HOW TO USE IT : Enter the vtab and htab values for the 
screen location and the character you want. 

SUGGESTED USES : Use it to determine the values for 
poking any character (including the three "illegal" 
characters) directly to the screen. The one screen 
location you CANNOT PRINT TO is VTAB 24, HTAB40. Doing 
so will scroll the screen up one line. Instead, you can 
POKE 2039, (value of the character you want printed). No 
scrol 1 ! 

LIMITATIONS : It is usually more convenient to type 
"FLASH: VTAB 1: HTAB 1: PRINT "A": NORMAL " than to "POKE 
1024,65" even though the second command takes less 
space. 

HOW IT WORKS : The program actually prints the character 
you select in its three modes on the left of the screen, 
and then PEEKs those three locations to determine the 
character values. 
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Bigliner 

WHAT IT DOES : Renumbers Applesoft program lines to 65535 
to make them inaccessible to most people. 

HOW TO USE IT : < 1 > Load your program. <2> EXEC 
BIBLINER. The instructions are on the screen. Bigliner 
will either up-number your highest-numbered program 
lines, one at a time to 65535 <all the same number), or 
it will down-number all lines above 63999 so you can 
access them. 

SUSBE5TED USES ; <1> Protect your copyright notice or 
special routines -from unauthorized tampering by putting 
them at the end of your program. < 2 > Perform 
unauthorized tampering. (Note: Don't tamper with a 
Beagle Bros program, or your Apple will £yt^* : te*t^£*' 1CJ, " 
•KpLetle- mair±-, turn into a TRS-80. 

LIMITATIONS : Bigliner will not renumber GOSUBS, GOTOB 
and THEN line numbers within your statements. To play it 
safe, use Bigliner for REMs only, or number your lines 
accordingly before you use Bigliner. All "big lines" 
will have the same number, 65535, the biggest legitimate 
line number possible on the Apple. 

HOW IT WORKS : Bigliner attaches itself to the end of 
your program, finds each line number in memory (as in 
Line Search on the U-City disk), looks at each line 
number, and pokes in new values as requested. 

Hex, Dec & Dex 

WHAT THEY DO : The HEX program converts decimal numbers 
0-65535 to hexidecimal numbers *0000-*FFFF. DEC converts 
numbers *0000-*FFFF to positive and negative decimal 
numbers. DEX does both of the above plus conversions to 
binary. All three programs may be used with your current 
program staying intact. 

HOW TO USE THEN : < 1 > To use HEX , type A=1234 (the 
decimal number you want converted). Then EXEC HEX. < 2 > 
To use DEC , type A*="12AB" (the hex number you want 
converted)!. Then EXEC DEC. < 3 > To use DEX , EXEC DEX. 

SUGGESTED USES : Use DEC or HEX for quick conversions of 
one or two numbers. Use DEX when you have a lot of 
converting to do, or if you want binary conversions, or 
if you want to convert from negative decimal. 

L IMITATIONS : You cannot convert from binary to hex or 
decimal with DEX (it won't do Roman numerals either). 

HOW THEY WORK : DEC pokes the value A into locations 768 
•?( 769, enters the monitor, and lists the two locations. 
HEX simply multiplies each "digit" of A* by 16"'"0, 16"'i, 
16'""2 ?< 16--3. DEX does all of the above. 
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Xlister 

WHAT IT DOES: Produces an easy-to-read re-formatted 
listing of any Applesoft program. Each program statement 
will be listed on a new line. Each statement following a 
FOR will be indented until a NEXT is encountered. All 
statements within a line following an IF-THEN statement 
will be marked with an asterisk (*). Only one space 
instead of two will appear between tokens (such as THEN 
and GOTO). Printer page breaks will occur for printed 
1 i sti ngs. 

HOW TO USE IT 8 Load your program and then EXEC XLISTER. 
Select options from the questions on the screen. 
Pressing <return >-onl y will select the displayed default 
value. If you are using a printer, be sure it is TURNED 
ON, or the program will hang up. Xlister may be stopped 
at any time with a CTRL-C. Do not use < reset,';- or your 
program will be lost. 

PRINTER NOTES ; If your printer is connected to other 
than SLOT #1, load XLISTER. A, and change Line SO. Also, 
Xlister assumes a page length of 66 lines with 
page-break margins of 3 lines top and bottom. Line 60 
contains these values; change them if you want. SAVE 
XLISTER. A after you have made the changes. 

SUGGESTED USES : Use Xlister on programs you want to 
de-bug or list in a nicely-formatted printout. Having 
each statement on a new line makes a tremendous 
difference in following the logical sequence of a 
program. The "*" callout after IF-THEN statements shows 
you at a glance the statements which will be encountered 
only if the IF statement is true. 

L INI TAT IONS: < 1 > Xlister is much slower than the normal 
list routine, so it is far more practical with a printer 
than without. < 2 > Loops are indented two spaces to the 
right or left for every FOR or NEXT encountered. If your 
program does not follow a normal sequence (if you have a 
NEXT before a FOR or a FOR at the top of a program and 
its NEXT at the end), you will see some illogical 
looking indentation, not too objectionable. Perhaps you 
have found a bug? 

HOW IT WORKS : Xlister is appended to your program and 
then looks at every byte between your program's start 
and end points, analyzes it, and prints it in its 
interpreted form. See Line Search, How it Works, for a 
discussion of Applesoft's token system. 
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